/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/Storable/t/ |
H A D | just_plain_nasty.t | 34 require File::Spec; 35 if ($File::Spec::VERSION < 0.8) { 36 print "1..0 # Skip: newer File::Spec needed\n";
|
H A D | code.t | 34 require File::Spec; 35 if ($File::Spec::VERSION < 0.8) { 36 print "1..0 # Skip: newer File::Spec needed\n"; 195 my $devnull = File::Spec->devnull;
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/t/io/ |
H A D | argv.t | 12 use File::Spec; 14 my $devnull = File::Spec->devnull;
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/t/lib/ |
H A D | 1_compile.t | 14 use File::Spec::Functions;
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/IO/lib/IO/ |
H A D | File.pm | 118 use File::Spec; 170 && ! File::Spec->file_name_is_absolute($file)) 172 $file = File::Spec->catfile(File::Spec->curdir(),$file);
|
H A D | Dir.pm | 19 use File::Spec; 111 -e File::Spec->catfile(${*$dh}{io_dir_path}, $key); 116 &lstat(File::Spec->catfile(${*$dh}{io_dir_path}, $key)); 122 my $file = File::Spec->catfile(${*$dh}{io_dir_path}, $key); 137 my $file = File::Spec->catfile(${*$dh}{io_dir_path}, $key);
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/File/Spec/ |
H A D | VMS.pm | 1 package File::Spec::VMS; 5 require File::Spec::Unix; 9 @ISA = qw(File::Spec::Unix); 16 File::Spec::VMS - methods for VMS file specs 20 require File::Spec::VMS; # Done internally by File::Spec if needed 24 See File::Spec::Unix for a documentation of the methods provided 393 return vmspath(File::Spec::Unix::abs2rel( $self, @_ )) 446 return vmspath(File::Spec::Unix::rel2abs( $self, @_ )) 491 See L<File::Spec> an [all...] |
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/File/ |
H A D | Temp.pm | 129 use File::Spec 0.8; 371 ($volume, $directories, $file) = File::Spec->splitpath( $path, 1); 375 my @dirs = File::Spec->splitdir($directories); 380 $parent = File::Spec->curdir; 384 $parent = File::Spec->catdir($volume, @dirs[0..$#dirs-1]); 389 $parent = File::Spec->catdir(@dirs[0..$#dirs-1]); 392 $parent = File::Spec->catpath($volume, $parent, ''); 400 ($volume, $directories, $file) = File::Spec->splitpath( $path ); 403 $parent = File::Spec->catpath($volume,$directories,''); 406 $parent = File::Spec [all...] |
H A D | CheckTree.pm | 6 use File::Spec; 113 $file = File::Spec->catfile($cwd, $file) 114 if $cwd && !File::Spec->file_name_is_absolute($file);
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/ |
H A D | AutoSplit.t | 28 use File::Spec; 76 my $dir = File::Spec->catdir($incdir, 'auto'); 86 my $file = File::Spec->catfile($incdir,"$module.pm"); 151 my $com = 'require "' . File::Spec->catfile ('auto', $args{Require}) . '"'; 163 my $file = File::Spec->catfile($dir, $args{Require}); 270 like (&*MOD*::test6, qr!^\Q*INC**PATHSEP**MOD*\E\.pm \(autosplit into \Q@{[File::Spec->catfile('*DIR*','*MOD*', 'test6.al')]}\E\):\d+$!);
|
H A D | h2xs.t | 20 use File::Spec; 25 my $up = File::Spec->updir(); 202 foreach my $leaf (File::Spec->catfile('lib', "$name.pm"), 'Makefile.PL') { 203 my $file = File::Spec->catfile($name, $leaf);
|
H A D | charnames.t | 14 require File::Spec; 275 my $alifile = File::Spec->catfile(File::Spec->updir, qw(lib unicore xyzzy_alias.pl));
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/Math/BigInt/t/ |
H A D | bigints.t | 19 require File::Spec; 20 unshift @INC, File::Spec->catdir(File::Spec->updir, $location);
|
H A D | inf_nan.t | 27 require File::Spec; 28 unshift @INC, File::Spec->catdir(File::Spec->updir, $location);
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/Errno/ |
H A D | Errno_pm.PL | 73 use File::Spec; 75 my $upup_cppstdin = File::Spec->catfile(File::Spec->updir, 76 File::Spec->updir,
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/t/ |
H A D | TEST | 63 use File::Spec; 64 my $curdir = File::Spec->curdir; 65 my $updir = File::Spec->updir; 74 my $fullpath = File::Spec->catfile($dir, $f); 100 my $mani = File::Spec->catfile($updir, "MANIFEST"); 107 $path = File::Spec->catfile($updir, $t); 176 my $tname = File::Spec->catfile('t',$t);
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/ExtUtils/ |
H A D | MM_Cygwin.pm | 7 use File::Spec;
|
H A D | Embed.pm | 9 use File::Spec; 203 $root = File::Spec->catdir(@ns); 207 next unless -e ($archive = File::Spec->catdir($_,"auto",$root,"$sub$lib_ext")); 209 if(-e ($extra = File::Spec->catdir($_,"auto",$root,"extralibs.ld"))) { 232 my $lpath = File::Spec->catdir($Config{archlibexp}, 'CORE'); 259 my $dir = File::Spec->catdir($Config{archlibexp}, 'CORE');
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/ExtUtils/t/ |
H A D | 00setup_dummy.t | 17 use File::Spec; 123 $file = File::Spec->catfile(File::Spec->curdir, split m{\/}, $file);
|
H A D | Manifest.t | 21 use File::Spec; 26 @INC = map { File::Spec->rel2abs($_) } @INC; 125 add_file( File::Spec->catfile('moretest', 'quux'), 'quux' );
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/Devel/ |
H A D | SelfStubber.pm | 2 use File::Spec; 33 $lib ||= File::Spec->curdir(); 37 $mod_file = File::Spec->catfile($lib, "$mod_file.pm");
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/Pod/t/ |
H A D | Functions.t | 9 use File::Spec; 50 my $pod_functions = File::Spec->catfile( 51 $path, File::Spec->updir, 'Functions.pm' );
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/t/op/ |
H A D | stat.t | 10 use File::Spec; 38 my $Curdir = File::Spec->curdir; 97 my $cwd = File::Spec->rel2abs($Curdir); 332 my $Null = File::Spec->devnull; 344 my $statfile = File::Spec->catfile($Curdir, 'op', 'stat.t');
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/CPAN/ |
H A D | FirstTime.pm | 19 use File::Spec; 101 my $cpan_home = $CPAN::Config->{cpan_home} || File::Spec->catdir($ENV{HOME}, ".cpan"); 120 unless (File::Spec->file_name_is_absolute($ans)) { 123 my $absans = File::Spec->catdir($cwd,$ans); 152 $CPAN::Config->{keep_source_where} = File::Spec->catdir($CPAN::Config->{cpan_home},"sources"); 153 $CPAN::Config->{build_dir} = File::Spec->catdir($CPAN::Config->{cpan_home},"build"); 242 $default = File::Spec->catfile($CPAN::Config->{cpan_home},"histfile"); 306 if (File::Spec->file_name_is_absolute($path)) { 333 if (File::Spec->file_name_is_absolute($path)) { 475 my $mby = File::Spec [all...] |
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/Unicode/Normalize/ |
H A D | mkheader | 16 use File::Spec; 82 $f = File::Spec->catfile($d, "unicore", "CompositionExclusions.txt"); 84 $f = File::Spec->catfile($d, "unicode", "CompExcl.txt");
|