Searched defs:runperl (Results 1 - 2 of 2) sorted by relevance

/osnet-11/usr/src/cmd/perl/5.8.4/distrib/t/run/
H A Drunenv.t34 sub runperl { subroutine
83 my ($success, $reason) = runperl(@_);
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/t/
H A Dtest.pl340 # runperl - Runs a separate perl interpreter.
358 my ($runperl, $args) = @_;
364 $$runperl .= ' ' . $_;
368 sub _create_runperl { # Create the string to qx in runperl().
370 my $runperl = $^X =~ m/\s/ ? qq{"$^X"} : $^X;
373 $runperl .= ' -I::lib';
375 $runperl .= ' -MMac::err=unix' if $args{stderr};
378 $runperl .= ' "-I../lib"'; # doublequotes because of VMS
383 die "test.pl:runperl(): 'switches' must be an ARRAYREF " . _where()
385 _quote_args(\$runperl,
447 sub runperl { subroutine
[all...]

Completed in 67 milliseconds