/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/ExtUtils/t/ |
H A D | testlib.t | 33 ok( !(grep !File::Spec->file_name_is_absolute($_), @blib_paths),
|
H A D | MM_Unix.t | 30 use File::Spec; 46 # File::Spec calls, the test's become a bit pointless 50 is ($class->canonpath($_), File::Spec->canonpath($_), "canonpath $_"); 53 is ($class->catdir('xx','xx'), File::Spec->catdir('xx','xx'), 55 is ($class->catfile('xx','xx','yy'), File::Spec->catfile('xx','xx','yy'), 59 File::Spec->file_name_is_absolute('Bombdadil'), 62 is ($class->path(), File::Spec->path(), 'path() same as File::Spec->path()'); 66 is ($class->$_(), File::Spec->$_(), $_ );
|
H A D | Install.t | 18 use File::Spec; 75 my $native_dummy = File::Spec->catfile(qw(install-test lib perl Big Dummy.pm));
|
H A D | oneliner.t | 17 use File::Spec;
|
H A D | Installed.t | 23 use File::Spec; 64 ok( $ei->_is_type( File::Spec->catfile($prefix, 'bar'), 'prog'), 107 my $fake_mod_dir = File::Spec->catdir(cwd(), 'auto', 'FakeMod'); 141 (File::Spec->catdir($Config{man1direxp}, 'foo') => 1) : 144 (File::Spec->catdir($Config{man3direxp}, 'bar') => 1) : 146 File::Spec->catdir($prefix, 'foobar') => 1,
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/Memoize/t/ |
H A D | tie.t | 32 if (eval {require File::Spec::Functions}) { 33 File::Spec::Functions->import('tmpdir', 'catfile');
|
H A D | tie_ndbm.t | 32 if (eval {require File::Spec::Functions}) { 33 File::Spec::Functions->import();
|
H A D | tie_sdbm.t | 31 if (eval {require File::Spec::Functions}) { 32 File::Spec::Functions->import('tmpdir', 'catfile');
|
H A D | tie_storable.t | 37 if (eval {require File::Spec::Functions}) { 38 File::Spec::Functions->import();
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/File/Spec/ |
H A D | Unix.pm | 1 package File::Spec::Unix; 10 File::Spec::Unix - File::Spec for Unix, base for other File::Spec modules 14 require File::Spec::Unix; # Done automatically by File::Spec 18 Methods for manipulating file specifications. Other File::Spec 19 modules, such as File::Spec::Mac, inherit from File::Spec::Unix and 31 $cpath = File::Spec [all...] |
H A D | OS2.pm | 1 package File::Spec::OS2; 5 require File::Spec::Unix; 9 @ISA = qw(File::Spec::Unix); 235 File::Spec::OS2 - methods for OS/2 file specs 239 require File::Spec::OS2; # Done internally by File::Spec if needed 243 See L<File::Spec> and L<File::Spec::Unix>. This package overrides the
|
H A D | Mac.pm | 1 package File::Spec::Mac; 5 require File::Spec::Unix; 9 @ISA = qw(File::Spec::Unix); 21 File::Spec::Mac - File::Spec for Mac OS (Classic) 25 require File::Spec::Mac; # Done internally by File::Spec if needed 57 to portability reasons. Since C<File::Spec-E<gt>catdir()> returns relative paths 137 like passingC<File::Spec-E<gt>rootdir()> as the first argument, i.e. 177 versions of File::Spec com [all...] |
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/ |
H A D | FindBin.pm | 99 use File::Spec; 135 foreach $dir (File::Spec->path) 137 my $scr = File::Spec->catfile($dir, $script); 163 $script = File::Spec->catfile(getcwd(), $script) 164 unless File::Spec->file_name_is_absolute($script); 176 $script = (File::Spec->file_name_is_absolute($linktext)) 178 : File::Spec->catfile($RealBin, $linktext);
|
H A D | lib_pm.PL | 3 use File::Spec; 65 require File::Spec; 91 ? File::Spec->catdir( $path, $incver ) 137 $arch_auto_dir = File::Spec->catdir( $dir, $archname, 'auto' ); 138 $arch_dir = File::Spec->catdir( $dir, $archname, ); 139 $version_dir = File::Spec->catdir( $dir, $version ); 140 $version_arch_dir = File::Spec->catdir( $dir, $version, $archname ); 238 In the future, this module will likely use File::Spec for determining
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/File/Temp/t/ |
H A D | object.t | 6 use File::Spec; 52 DIR => File::Spec->curdir,
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/Pod/t/ |
H A D | pod2html-lib.pl | 4 use File::Spec::Functions;
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/Test/Harness/t/ |
H A D | strap-analyze.t | 15 use File::Spec; 17 my $Curdir = File::Spec->curdir; 19 ? File::Spec->catdir($Curdir, 'lib', 'sample-tests') 20 : File::Spec->catdir($Curdir, 't', 'sample-tests'); 484 my $test_path = File::Spec->catfile($SAMPLE_TESTS, $test);
|
H A D | test-harness.t | 14 use File::Spec; 16 my $Curdir = File::Spec->curdir; 18 ? File::Spec->catdir($Curdir, 'lib', 'sample-tests') 19 : File::Spec->catdir($Curdir, 't', 'sample-tests'); 488 my $test_path = File::Spec->catfile($SAMPLE_TESTS, $test);
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/t/pod/ |
H A D | testpchk.pl | 5 use File::Spec; 12 push @INC, map { File::Spec->catfile($_, 'lib') } ($PARENTDIR, $THISDIR);
|
H A D | testp2pt.pl | 5 use File::Spec; 13 push @INC, map { File::Spec->catfile($_, 'lib') } ($PARENTDIR, $THISDIR); 36 sub catfile(@) { File::Spec->catfile(@_); }
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/Test/Harness/bin/ |
H A D | prove | 8 use File::Spec; 76 @ARGV = File::Spec->curdir unless @ARGV; 97 next if $file eq File::Spec->updir || $file eq File::Spec->curdir; 101 my $currfile = File::Spec->catfile( $start, $file ); 131 my $dir = File::Spec->curdir; 143 my $blib = File::Spec->catdir( $dir, "blib" ); 144 my $blib_lib = File::Spec->catdir( $blib, "lib" ); 145 my $blib_arch = File::Spec->catdir( $blib, $archdir ); 150 $dir = File::Spec [all...] |
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/Pod/ |
H A D | Find.pm | 51 use File::Spec; 149 push(@search, grep($_ ne File::Spec->curdir, @new_INC)); 151 push(@search, grep($_ ne File::Spec->curdir, @INC)); 184 unless(File::Spec->file_name_is_absolute($try)) { 186 $try = File::Spec->catfile($pwd,$try); 191 $try = File::Spec->canonpath($try) if ($^O ne 'VMS'); 366 '-dirs' => [ File::Spec->curdir ], 383 # Split on :: and then join the name together using File::Spec 413 #my $perlpoddir = File::Spec->catdir($Config::Config{'installprivlib'}, 435 my $fullname = File::Spec [all...] |
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/t/lib/MakeMaker/Test/ |
H A D | Utils.pm | 3 use File::Spec; 73 my $perlpath = File::Spec->rel2abs( $perl ); 82 foreach my $path (File::Spec->path) { 83 $perlpath = File::Spec->catfile($path, $perl); 106 $lib = File::Spec->rel2abs($lib);
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/Math/BigInt/t/ |
H A D | _e_math.t | 22 require File::Spec; 23 unshift @INC, File::Spec->catdir(File::Spec->updir, $location);
|
H A D | biglog.t | 31 require File::Spec; 32 unshift @INC, File::Spec->catdir(File::Spec->updir, $location);
|