The block was skipped for perl 5.8.2 and below, but we now require 5.8.3.
system { $^X } $^X, '-T', map("-I$_", @INC), '-e', $code;
}
system { $^X } $^X, '-T', map("-I$_", @INC), '-e', $code;
}
- skip 'Fails on 5.8.2 and lower' => 1 if "$]" <= 5.008_002;
-
my $status = run_perl <<' RUN';
{ package IntX; package IntY; package IntZ; }
my ($code, @expected);
my $status = run_perl <<' RUN';
{ package IntX; package IntY; package IntZ; }
my ($code, @expected);