/osnet-11/usr/src/cmd/perl/5.8.4/distrib/t/uni/ |
H A D | case.pl | 1 use File::Spec; 11 my $file = File::Spec->catfile(File::Spec->catdir(File::Spec->updir,
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/Pod/t/ |
H A D | basic.t | 38 require File::Spec; 39 my $updir = File::Spec->updir; 40 my $dir = File::Spec->catdir ($updir, 'lib', 'Pod', 't'); 41 return File::Spec->catfile ($dir, $file);
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/B/t/ |
H A D | o.t | 11 use File::Spec; 14 my $path = File::Spec->catdir( 'lib', 'B' ); 19 my $file = File::Spec->catfile( $path, 'success.pm' );
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/Math/BigInt/t/ |
H A D | bigroot.t | 28 require File::Spec; 29 unshift @INC, File::Spec->catdir(File::Spec->updir, $location);
|
H A D | mbimbf.t | 25 require File::Spec; 26 unshift @INC, File::Spec->catdir(File::Spec->updir, $location);
|
H A D | calling.t | 25 require File::Spec; 26 unshift @INC, File::Spec->catdir(File::Spec->updir, $location);
|
H A D | upgradef.t | 20 require File::Spec; 21 unshift @INC, File::Spec->catdir(File::Spec->updir, $location);
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/Test/Simple/t/ |
H A D | exit.t | 13 unless( eval { require File::Spec } ) { 14 print "1..0 # Skip Need File::Spec to run this test\n"; 74 my $lib = File::Spec->catdir(qw(lib Test Simple sample_tests)); 89 my $file = File::Spec->catfile($lib, $test_name);
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/ |
H A D | blib.t | 9 use File::Spec; 69 $blib_arch = File::Spec->catdir("blib","arch"); 70 $blib_lib = File::Spec->catdir("blib","lib");
|
H A D | lib.t | 11 use File::Spec; 27 $Auto_Dir = File::Spec->catdir(@lib_dir, $Config{archname},'auto'); 28 $Module = File::Spec->catfile(@lib_dir, 'Yup.pm');
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/ExtUtils/t/ |
H A D | Embed.t | 13 use File::Spec; 28 my $inc = File::Spec->updir; 29 my $lib = File::Spec->updir; 65 $inc = File::Spec->catdir($inc,'win32'); 67 $inc = File::Spec->catdir($inc,'include'); 73 push(@cmd,"-L$lib",File::Spec->catfile($lib,$Config{'libperl'}),$Config{'libc'}); 106 $testlib = File::Spec::->catfile($lib, $testlib); 107 $srclib = File::Spec::->catfile($lib, $srclib); 132 my $embed_test = File::Spec->catfile(File::Spec [all...] |
H A D | INST.t | 22 use File::Spec; 33 my $Curdir = File::Spec->curdir; 34 my $Updir = File::Spec->updir; 69 $perl_src = File::Spec->catdir($Updir, $Updir); 70 $perl_src = File::Spec->canonpath($perl_src); 71 $mm_perl_src = File::Spec->canonpath($mm->{PERL_SRC}); 88 : File::Spec->catdir($Curdir, 'blib', 'arch'), 90 is( $mm->{INST_BIN}, File::Spec->catdir($Curdir, 'blib', 'bin'), 98 : File::Spec->catdir($Updir, 'blib', 'arch'), 100 is( $c_mm->{INST_BIN}, File::Spec [all...] |
H A D | VERSION_FROM.t | 25 END { chdir File::Spec->updir; rmtree 'Odd-Version' }
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/File/Find/t/ |
H A D | taint.t | 46 use File::Spec; 53 untaint => 1, untaint_pattern => qr|^(.+)$|}, File::Spec->curdir); 59 untaint => 1, untaint_pattern => qr|^(.+)$|}, File::Spec->curdir); 85 chdir File::Spec->updir; 151 return File::Spec->catdir(@_); 154 my $path = File::Spec->catdir(@_); 162 return File::Spec->catdir($first_arg, @_); # relative path 199 return File::Spec->catfile(@_); 202 my $path = File::Spec->catfile(@_); 210 return File::Spec [all...] |
H A D | find.t | 39 use File::Spec; 43 # Win32 or VMS, so force File::Spec to use Unix names. 45 require File::Spec::Unix; 46 @File::Spec::ISA = 'File::Spec::Unix'; 56 File::Spec->curdir); 65 File::Spec->curdir); 94 chdir(File::Spec->updir); 224 return File::Spec->catdir(@_); 227 my $path = File::Spec [all...] |
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/ExtUtils/ |
H A D | Install.pm | 21 use File::Spec; 22 my $Curdir = File::Spec->curdir; 23 my $Updir = File::Spec->updir; 138 my $blib_lib = File::Spec->catdir('blib', 'lib'); 139 my $blib_arch = File::Spec->catdir('blib', 'arch'); 154 my $targetdir = File::Spec->catdir($targetroot, $File::Find::dir); 155 my $targetfile = File::Spec->catfile($targetdir, $origfile); 156 my $sourcedir = File::Spec->catdir($source, $File::Find::dir); 157 my $sourcefile = File::Spec->catfile($sourcedir, $origfile); 215 File::Spec [all...] |
H A D | MM_BeOS.pm | 22 use File::Spec; 51 File::Spec->catdir('$(PERL_INC)',$Config{libperl});
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/t/ |
H A D | harness | 69 use File::Spec; 70 my $updir = File::Spec->updir; 71 my $mani = File::Spec->catfile(File::Spec->updir, "MANIFEST"); 75 push @tests, File::Spec->catfile($updir, $1);
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/Sys/Syslog/ |
H A D | Makefile.PL | 7 use File::Spec; 41 if (! -f File::Spec->catfile("win32", "$name.dll")) { 43 open(UU, '<' . File::Spec->catfile("win32", "$name\_dll.uu")) 49 open(DLL, '>' . File::Spec->catfile("win32", "$name.dll")) 93 'File::Spec' => 0, 193 my $fallback = File::Spec->catfile('fallback', $file);
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/File/Spec/ |
H A D | Win32.pm | 1 package File::Spec::Win32; 6 require File::Spec::Unix; 10 @ISA = qw(File::Spec::Unix); 14 File::Spec::Win32 - methods for Win32 file specs 18 require File::Spec::Win32; # Done internally by File::Spec if needed 22 See File::Spec::Unix for a documentation of the methods provided 51 The SYS:/temp is preferred in Novell NetWare (the File::Spec::Win32 170 ($volume,$directories,$file) = File::Spec->splitpath( $path ); 171 ($volume,$directories,$file) = File::Spec [all...] |
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/Cwd/t/ |
H A D | cwd.t | 11 use File::Spec; 93 my $Test_Dir = File::Spec->catdir(@test_dirs); 106 my $updir = File::Spec->updir; 136 my $want = File::Spec->catdir("t", $Test_Dir); 151 grep length, File::Spec->splitdir(File::Spec->canonpath( shift() ));
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/File/Temp/t/ |
H A D | tempfile.t | 7 use File::Spec; 60 DIR => File::Spec->curdir, 133 $fh = eval { tempfile( 'ftmpXXXXX', DIR => File::Spec->tmpdir ) };
|
H A D | security.t | 12 use File::Spec; 97 DIR => File::Spec->tmpdir, 108 my $skip2 = "Skip: " . File::Spec->tmpdir() . " possibly insecure: $@. " .
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/IO/t/ |
H A D | IO.t | 11 use File::Spec; 82 my $fakedir = File::Spec->catdir( 'lib', 'IO' ); 83 my $fakemod = File::Spec->catfile( $fakedir, 'fakemod.pm' );
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/I18N/Langinfo/ |
H A D | Makefile.PL | 67 use File::Spec; 69 my $fallback = File::Spec->catfile('fallback', $file);
|