blob: 72b068fe838b2d376ee9b83d6f3094f0c177d094 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
|
#!./perl
# Ensure that the -P and -x flags work together.
BEGIN {
chdir 't' if -d 't';
@INC = '../lib';
$ENV{PERL5LIB} = '../lib';
use Config;
if ( $^O eq 'MacOS' || ($Config{'cppstdin'} =~ /\bcppstdin\b/) &&
! -x $Config{'binexp'} . "/cppstdin" ) {
print "1..0 # Skip: \$Config{cppstdin} unavailable\n";
exit; # Cannot test till after install, alas.
}
}
require './test.pl';
print runperl( switches => ['-Px'],
nolib => 1, # for some reason this is necessary under VMS
progfile => 'run/switchPx.aux' );
|
