1#!./perl
2
3BEGIN {
4 chdir 't';
5 @INC = '../lib';
6}
7
8my $module = shift;
9
10# 'require open' confuses Perl, so we use instead.
11eval "use $module ();";
12if( $@ ) {
13 print "not ";
14 $@ =~ s/\n/\n# /g;
15 warn "# require failed with '$@'\n";
16}
17print "ok - $module\n";
18
19
20