/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/File/Spec/t/ |
H A D | rel2abs2rel.t | 1 #!/usr/bin/perl -w 27 # Change 'perl' to './perl' so the shell doesn't go looking through PATH. 29 my($perl) = shift; 30 $perl = File::Spec->catfile(File::Spec->curdir, $perl) unless 31 File::Spec->file_name_is_absolute($perl); 33 return $perl; 35 # Make a putative perl binary say "ok\n". We have to do it this way 38 # `$perl [all...] |
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/t/io/ |
H A D | inplace.t | 1 #!./perl 11 $CAT = '.\perl -e "print<>"'; 12 `.\\perl -le "print 'foo'" > .a`; 13 `.\\perl -le "print 'foo'" > .b`; 14 `.\\perl -le "print 'foo'" > .c`; 17 $CAT = 'perl -e "print<>"'; 18 `perl -le "print 'foo'" > .a`; 19 `perl -le "print 'foo'" > .b`; 20 `perl -le "print 'foo'" > .c`; 29 $CAT = 'MCR []perl [all...] |
H A D | iprefix.t | 1 #!./perl 11 $CAT = '.\perl -e "print<>"'; 12 `.\\perl -le "print 'foo'" > .a`; 13 `.\\perl -le "print 'foo'" > .b`; 14 `.\\perl -le "print 'foo'" > .c`; 17 $CAT = 'perl -e "print<>"'; 18 `perl -le "print 'foo'" > .a`; 19 `perl -le "print 'foo'" > .b`; 20 `perl -le "print 'foo'" > .c`; 23 $CAT = 'MCR []perl [all...] |
H A D | openpid.t | 1 #!./perl 27 my $perl = which_perl(); 28 $perl .= qq[ "-I../lib"]; 31 # commands run 4 perl programs. Two of these programs write a 37 $cmd1 = qq/$perl -e "\$|=1; print qq[first process\\n]; sleep 30;"/; 38 $cmd2 = qq/$perl -e "\$|=1; print qq[second process\\n]; sleep 30;"/; 39 $cmd3 = qq/$perl -e "print <>;"/; # hangs waiting for end of STDIN 40 $cmd4 = qq/$perl -e "print scalar <>;"/;
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/Devel/DProf/t/ |
H A D | DProf.t | 0 #!perl 25 # -p Name of perl binary 31 $perl = $opt_p || which_perl(); 35 print "perl: $perl\n"; 38 if( $perl =~ m|^\./| ){ 39 # turn ./perl into ../perl, because of chdir(t) above. 40 $perl = ".$perl"; [all...] |
/osnet-11/usr/src/cmd/dtrace_toolkit/DTT/Bin/ |
H A D | pl_flowinfo.d | 61 perl*:::sub-entry, 62 perl*:::sub-return 68 perl*:::sub-entry 78 perl*:::sub-return
|
H A D | pl_flowtime.d | 63 perl*:::sub-entry, 64 perl*:::sub-return 70 perl*:::sub-entry 80 perl*:::sub-return
|
H A D | pl_subcalls.d | 46 perl*:::sub-entry
|
H A D | pl_who.d | 47 perl*:::sub-entry
|
H A D | pl_flow.d | 58 perl*:::sub-entry 65 perl*:::sub-return
|
H A D | pl_syscalls.d | 17 * The filename for syscalls may be printed as "perl", if the program 18 * was invoked using the form "perl filename" rather than running the 49 perl$target:::sub-entry
|
H A D | pl_syscolors.d | 65 perl$target:::sub-entry, 66 perl$target:::sub-return, 74 perl$target:::sub-entry 84 perl$target:::sub-return
|
H A D | pl_malloc.d | 44 perl$target:::sub-entry 50 perl$target:::sub-return
|
/osnet-11/usr/src/cmd/dtrace_toolkit/DTT/Perl/ |
H A D | pl_flowinfo.d | 61 perl*:::sub-entry, 62 perl*:::sub-return 68 perl*:::sub-entry 78 perl*:::sub-return
|
H A D | pl_flowtime.d | 63 perl*:::sub-entry, 64 perl*:::sub-return 70 perl*:::sub-entry 80 perl*:::sub-return
|
H A D | pl_subcalls.d | 46 perl*:::sub-entry
|
H A D | pl_who.d | 47 perl*:::sub-entry
|
H A D | pl_flow.d | 58 perl*:::sub-entry 65 perl*:::sub-return
|
H A D | pl_syscalls.d | 17 * The filename for syscalls may be printed as "perl", if the program 18 * was invoked using the form "perl filename" rather than running the 49 perl$target:::sub-entry
|
H A D | pl_syscolors.d | 65 perl$target:::sub-entry, 66 perl$target:::sub-return, 74 perl$target:::sub-entry 84 perl$target:::sub-return
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/IPC/ |
H A D | Open3.t | 1 #!./perl -w 23 my $perl = $^X; 55 ok 1, $pid = open3 'WRITE', 'READ', 'ERROR', $perl, '-e', cmd_line(<<'EOF'); 71 $pid = open3 'WRITE', 'READ', 'READ', $perl, '-e', cmd_line(<<'EOF'); 83 $pid = open3 'WRITE', 'READ', '', $perl, '-e', cmd_line(<<'EOF'); 97 $perl, '-e', cmd_line('print scalar <STDIN>'); 106 $perl, '-e', cmd_line('print scalar <STDIN>'); 114 $perl, '-e', cmd_line('print STDERR scalar <STDIN>'); 119 $pid = open3 'WRITE', '>&STDOUT', '>&STDOUT', $perl, '-e', cmd_line(<<'EOF'); 129 $pid = open3 'WRITE', '>&STDOUT', '', $perl, ' [all...] |
H A D | Open2.t | 1 #!./perl -w 23 my $perl = './perl'; 51 ok 1, $pid = open2 'READ', 'WRITE', $perl, '-e',
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/ByteLoader/ |
H A D | ByteLoader.pm | 14 ByteLoader - load byte compiled perl code 23 perl -MByteLoader bytecode_file 27 This module is used to load byte compiled perl code as produced by 28 C<perl -MO=Bytecode=...>. It uses the source filter mechanism to read 38 perl(1).
|
/osnet-11/usr/src/cmd/perl/5.8.4/ |
H A D | req.flg | 9 # We need the files in the usr/cmd/perl/contrib area, and perl builds a private 14 find_files "s.*" usr/src/cmd/perl/contrib
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/t/lib/dprof/ |
H A D | V.pm | 14 $perl = $opt_p || $^X; 18 print "\nperl: $perl\n" if $opt_v; 19 if( ! -f $perl ){ die "Where's Perl?" } 28 open( D, "$perl \"-I../lib\" $dpp \"$switches\" 2> err |" ) || warn "$0: Can't run. $!\n";
|