english.t revision 7c478bd95313f5f23a4c958a745db2134aa03244
#!./perl
print "1..16\n";
use English;
use Config;
$_ = 1;
sub foo {
}
$_ = "ok 4\nok 5\nok 6\n";
} else {
}
/ok 5\n/;
print $PREMATCH, $MATCH, $POSTMATCH;
print 'ok',7;
undef $OUTPUT_RECORD_SEPARATOR;
eval 'NO SUCH FUNCTION';