Message-ID: <
20011030215626.A28503@rafael>
p4raw-id: //depot/perl@12795
#!./perl -w
-use warnings;
-use strict;
-
BEGIN {
unless(grep /blib/, @INC) {
chdir 't' if -d 't';
}
}
+use warnings;
+use strict;
use Config;
BEGIN {
if(-d "lib" && -f "TEST") {
if ($Config{'extensions'} !~ /\bDB_File\b/ ) {
- print "1..163\n";
+ print "1..0 # Skip: DB_File was not built\n";
exit 0;
}
}
#!./perl
-use warnings ;
-use strict ;
-
BEGIN {
unless(grep /blib/, @INC) {
chdir 't' if -d 't';
}
}
+use warnings;
+use strict;
use Config;
BEGIN {
if(-d "lib" && -f "TEST") {
if ($Config{'extensions'} !~ /\bDB_File\b/ ) {
- print "1..111\n";
+ print "1..0 # Skip: DB_File was not built\n";
exit 0;
}
}
#!./perl -w
-use warnings;
-use strict ;
-
BEGIN {
unless(grep /blib/, @INC) {
chdir 't' if -d 't';
}
}
+use warnings;
+use strict;
use Config;
BEGIN {
if(-d "lib" && -f "TEST") {
if ($Config{'extensions'} !~ /\bDB_File\b/ ) {
- print "1..138\n";
+ print "1..0 # Skip: DB_File was not built\n";
exit 0;
}
}
chdir 't' if -d 't';
@INC = '../lib';
require Config; import Config;
- if ($Config{'extensions'} !~ /\Encode\b/) {
+ if ($Config{'extensions'} !~ /\bEncode\b/) {
print "1..0 # Skip: Encode was not built\n";
exit 0;
}