This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
chained comparisons
[perl5.git] / lib / vars_carp.t
index 85a1951..f0b512a 100644 (file)
@@ -12,5 +12,6 @@ $| = 1;
 
 print "1..1\n";
 
+use vars;
 # Carp not loaded yet;
 print defined $Carp::VERSION ? "not ok 1\n" : "ok 1\n";