compmod.pl revision 7c478bd95313f5f23a4c958a745db2134aa03244
#!./perl
BEGIN {
chdir 't';
@INC = '../lib';
}
my $module = shift;
# 'require open' confuses Perl, so we use instead.
eval "use $module ();";
if( $@ ) {
print "not ";
$@ =~ s/\n/\n# /g;
warn "# require failed with '$@'\n";
}
print "ok - $module\n";