Optimize reversing an array in-place
[p5sagit/p5-mst-13.2.git] / lib / warnings.t
CommitLineData
f126f811 1#!./perl
bd4dea8e 2
3BEGIN {
4 chdir 't' if -d 't';
5 @INC = '../lib';
6 $ENV{PERL5LIB} = '../lib';
bd4dea8e 7}
8
0d863452 9our $pragma_name = "warnings";
2bd168e2 10our $UTF8 = (${^OPEN} || "") =~ /:utf8/;
0d863452 11require "../t/lib/common.pl";