Home
last modified time | relevance | path

Searched refs:Spec (Results 1 – 25 of 584) sorted by relevance

12345678910>>...24

/openbsd-src/gnu/usr.bin/perl/dist/PathTools/t/
H A DFunctions.t6 is(canonpath('a/b/c'), File::Spec->canonpath('a/b/c'));
7 is(case_tolerant(), File::Spec->case_tolerant());
8 is(catdir(), File::Spec->catdir());
9 is(catdir('a'), File::Spec->catdir('a'));
10 is(catdir('a','b'), File::Spec->catdir('a','b'));
11 is(catdir('a','b','c'), File::Spec->catdir('a','b','c'));
12 is(catfile(), File::Spec->catfile());
13 is(catfile('a'), File::Spec->catfile('a'));
14 is(catfile('a','b'), File::Spec->catfile('a','b'));
15 is(catfile('a','b','c'), File::Spec->catfile('a','b','c'));
[all …]
H A Dabs2rel.t7 use File::Spec();
25 File::Spec->catdir('first_sub_dir', 'sub_sub_dir'),
32 File::Spec->catfile('second_sub_dir', 'second_file')
45 my $rel_base = File::Spec->catdir(File::Spec->curdir(), 'sub_sub_dir');
46 my $abs_path = File::Spec->rel2abs($rel_path);
47 my $abs_base = File::Spec->rel2abs($rel_base);
62 my $rr_link = File::Spec->abs2rel($rel_path, $rel_base);
63 my $ra_link = File::Spec->abs2rel($rel_path, $abs_base);
64 my $ar_link = File::Spec->abs2rel($abs_path, $rel_base);
65 my $aa_link = File::Spec->abs2rel($abs_path, $abs_base);
H A Drel2abs2rel.t6 use File::Spec;
7 use lib File::Spec->catdir('t', 'lib');
32 $perl = File::Spec->catfile(File::Spec->curdir, $perl) unless
33 File::Spec->file_name_is_absolute($perl);
63 $perl = File::Spec->rel2abs($^X);
66 $perl = File::Spec->canonpath($perl);
69 $perl = safe_rel(File::Spec->abs2rel($perl));
72 $perl = safe_rel(File::Spec->canonpath($^X));
H A Dtmpdir.t4 # Grab all of the plain routines from File::Spec
5 use File::Spec;
6 use File::Spec::Win32;
8 require_ok($_) foreach qw(File::Spec File::Spec::Win32);
18 File::Spec->tmpdir;
26 File::Spec::Win32->tmpdir;
30 File::Spec::Win32->tmpdir;
34 for ('File::Spec', "File::Spec::Win32") {
51 File::Spec->file_name_is_absolute(File::Spec->tmpdir()),
/openbsd-src/gnu/usr.bin/perl/dist/PathTools/
H A DMANIFEST4 lib/File/Spec.pm
5 lib/File/Spec/AmigaOS.pm
6 lib/File/Spec/Cygwin.pm
7 lib/File/Spec/Epoc.pm
8 lib/File/Spec/Functions.pm
9 lib/File/Spec/Mac.pm
10 lib/File/Spec/OS2.pm
11 lib/File/Spec/Unix.pm
12 lib/File/Spec/VMS.pm
13 lib/File/Spec/Win32.pm
[all …]
/openbsd-src/gnu/usr.bin/perl/cpan/ExtUtils-MakeMaker/t/
H A DINST_PREFIX.t18 use File::Spec;
35 my $Curdir = File::Spec->curdir;
36 my $Updir = File::Spec->updir;
40 ok( chdir File::Spec->updir );
80 my $PREFIX = File::Spec->catdir('foo', 'bar');
112 $perl_src = File::Spec->catdir($Updir, $Updir, $Updir, $Updir, $Updir, $Updir);
113 $perl_src = File::Spec->canonpath($perl_src);
114 $mm_perl_src = File::Spec->canonpath($mm->{PERL_SRC});
162 my $wibble = File::Spec->catdir(qw(wibble and such));
180 _set_config(installvendorman1dir => File::Spec->catdir('foo','bar') );
[all …]
H A DINST.t18 use File::Spec;
33 my $Curdir = File::Spec->curdir;
34 my $Updir = File::Spec->updir;
38 ok( chdir File::Spec->updir );
79 $perl_src = File::Spec->catdir($Updir, $Updir, $Updir, $Updir, $Updir, $Updir);
80 $perl_src = File::Spec->canonpath($perl_src);
81 $mm_perl_src = File::Spec->canonpath($mm->{PERL_SRC});
98 : File::Spec->catdir($Curdir, 'blib', 'arch'),
100 is( $mm->{INST_BIN}, File::Spec->catdir($Curdir, 'blib', 'bin'),
112 : File::Spec->catdir($Updir, 'blib', 'arch')),
[all …]
H A Dbuild_man.t13 use File::Spec;
35 ok chdir File::Spec->updir, 'chdir updir';
47 local $Config{installman3dir} = File::Spec->catdir(qw(t lib));
169 = File::Spec->catdir( 'foo', "man$man1section" );
171 = File::Spec->catdir( 'foo', "man$man3section" );
182 = File::Spec->catdir( 'foo', "man$man1section" );
184 = File::Spec->catdir( 'foo', "man$man3section" );
191 $Config{installman1dir} = File::Spec->catdir( 'foo', 'cat1p' );
192 $Config{installman3dir} = File::Spec->catdir( 'foo', 'cat3p' );
193 $Config{installsiteman1dir} = File::Spec->catdir( 'foo', 'catL' );
[all …]
H A Deu_command.t25 use File::Spec;
41 my ($vol, $dirs, $file) = File::Spec->splitpath($self);
42 my @dirs = File::Spec->splitdir($dirs);
43 unshift(@dirs, File::Spec->updir);
44 $dirs = File::Spec->catdir(@dirs);
45 $self = File::Spec->catpath($vol, $dirs, $file);
188 my $test_dir = File::Spec->join( 'ecmddir', 'temp2' );
205 ok( -e File::Spec->join( 'ecmddir', 'temp2', $Testfile ), 'copied okay' );
220 ok( -e File::Spec->join( 'ecmddir', $Testfile ), 'file in new location' );
249 chdir File::Spec->updir;
[all …]
/openbsd-src/gnu/usr.bin/perl/cpan/podlators/t/data/
H A Dregenerate-data23 use File::Spec;
34 local $ENV{TERMPATH} = File::Spec->catfile('t', 'data', 'termcap');
42 'Pod::Man' => File::Spec->catfile('t', 'data', 'basic.man'),
43 'Pod::Text' => File::Spec->catfile('t', 'data', 'basic.txt'),
44 'Pod::Text::Color' => File::Spec->catfile('t', 'data', 'basic.clr'),
45 'Pod::Text::Overstrike' => File::Spec->catfile('t', 'data', 'basic.ovr'),
46 'Pod::Text::Termcap' => File::Spec->catfile('t', 'data', 'basic.cap'),
51 my $input = File::Spec->catfile('t', 'data', 'basic.pod');
77 $input = File::Spec->catfile('t', 'data', 'man', 'encoding.pod');
80 groff => File::Spec->catfile('t', 'data', 'man', 'encoding.groff'),
[all …]
/openbsd-src/gnu/usr.bin/perl/ext/Pod-Html/lib/Pod/Html/
H A DUtil.pm19 use File::Spec;
20 use File::Spec::Unix;
151 my ($vol, $dirs, $file) = File::Spec->splitpath($full_path);
152 my @dirs = $dirs eq File::Spec->curdir()
153 ? (File::Spec::Unix->curdir())
154 : File::Spec->splitdir($dirs);
166 unshift @dirs, '' if File::Spec->file_name_is_absolute($full_path);
168 $full_path = File::Spec::Unix->catfile(File::Spec::Unix->catdir(@dirs),
187 File::Spec
[all...]
/openbsd-src/gnu/llvm/llvm/lib/Support/
H A DFormatVariadic.cpp28 bool formatv_object_base::consumeFieldLayout(StringRef &Spec, AlignStyle &Where, in consumeFieldLayout() argument
33 if (Spec.empty()) in consumeFieldLayout()
36 if (Spec.size() > 1) { in consumeFieldLayout()
44 if (auto Loc = translateLocChar(Spec[1])) { in consumeFieldLayout()
45 Pad = Spec[0]; in consumeFieldLayout()
47 Spec = Spec.drop_front(2); in consumeFieldLayout()
48 } else if (auto Loc = translateLocChar(Spec[0])) { in consumeFieldLayout()
50 Spec = Spec.drop_front(1); in consumeFieldLayout()
54 bool Failed = Spec.consumeInteger(0, Align); in consumeFieldLayout()
59 formatv_object_base::parseReplacementItem(StringRef Spec) { in parseReplacementItem() argument
[all …]
/openbsd-src/gnu/usr.bin/perl/cpan/podlators/t/general/
H A Dbasic.t29 use File::Spec;
49 local $ENV{TERMPATH} = File::Spec->catfile('t', 'data', 'termcap');
54 my $input = File::Spec->catfile('t', 'data', 'basic.pod');
60 'Pod::Man' => File::Spec->catfile('t', 'data', 'basic.man'),
61 'Pod::Text' => File::Spec->catfile('t', 'data', 'basic.txt'),
62 'Pod::Text::Color' => File::Spec->catfile('t', 'data', 'basic.clr'),
63 'Pod::Text::Overstrike' => File::Spec->catfile('t', 'data', 'basic.ovr'),
64 'Pod::Text::Termcap' => File::Spec->catfile('t', 'data', 'basic.cap'),
97 my $tmpdir = File::Spec->catdir('t', 'tmp');
101 my $outfile = File::Spec->catfile('t', 'tmp', "out$$.$suffix");
/openbsd-src/gnu/usr.bin/perl/cpan/File-Temp/t/
H A Dtempfile.t6 use File::Spec;
61 DIR => File::Spec->curdir,
68 push(@dirs, File::Spec->rel2abs($tempdir));
71 DIR => File::Spec->curdir,
78 push(@dirs, File::Spec->rel2abs($tempdir));
90 push(@files, File::Spec->rel2abs($tempfile));
100 push(@files, File::Spec->rel2abs($tempfile));
117 push(@files, File::Spec->rel2abs($tempfile));
127 push(@files, File::Spec->rel2abs($tempfile));
142 push(@files, File::Spec->rel2abs($tempfile));
[all …]
/openbsd-src/gnu/usr.bin/perl/
H A Dmkppport7 use File::Spec;
16 unshift @INC, File::Spec->catdir($rootdir, qw(cpan ExtUtils-MakeMaker t lib));
22 list => File::Spec->catfile($rootdir, 'mkppport.lst'),
31 my $absroot = File::Spec->rel2abs($rootdir);
43 my $dest = File::Spec->catfile($fulldir, 'ppport.h');
58 unshift @INC, File::Spec->catdir($absroot, 'lib');
62 chdir File::Spec->catdir($rootdir, 'dist', 'Devel-PPPort');
88 my $dest = File::Spec->catfile($fulldir, 'ppport.h');
106 my $fulldir = File::Spec->catdir($absroot, $dir);
136 my @args = ("-I" . File::Spec->catdir((File::Spec->updir) x 2, 'lib'), @_);
/openbsd-src/gnu/usr.bin/perl/t/lib/
H A Ddeprecate.t10 use File::Spec ();
13 my $test_dir = File::Spec->catdir(qw(lib deprecate));
15 @INC = ( File::Spec->catdir( (File::Spec->updir)x3, qw(lib)) );
18 privlibexp => File::Spec->catdir(qw(lib perl)),
19 sitelibexp => File::Spec->catdir(qw(lib site)),
20 archlibexp => File::Spec->catdir(qw(lib perl arch)),
21 sitearchexp => File::Spec->catdir(qw(lib site arch)),
41 my $pm = File::Spec->catfile($dir, $module);
67 my $dir = File::Spec->catdir($libdir{$lib}, $sub_dir);
70 my $pm = File::Spec->catfile($dir, $module);
/openbsd-src/gnu/usr.bin/perl/cpan/File-Temp/lib/File/
H A DTemp.pm147 use File::Spec 0.8;
413 ($volume, $directories, $file) = File::Spec->splitpath( $path, 1);
417 my @dirs = File::Spec->splitdir($directories);
422 $parent = File::Spec->curdir;
426 $parent = File::Spec->catdir($volume, @dirs[0..$#dirs-1]);
431 $parent = File::Spec->catdir(@dirs[0..$#dirs-1]);
434 $parent = File::Spec->catpath($volume, $parent, '');
442 ($volume, $directories, $file) = File::Spec->splitpath( $path );
445 $parent = File::Spec->catpath($volume,$directories,'');
448 $parent = File::Spec->curdir
[all …]
/openbsd-src/gnu/usr.bin/perl/dist/ExtUtils-CBuilder/lib/ExtUtils/CBuilder/Platform/
H A DWindows.pm6 use File::Spec;
114 $srcdir ||= File::Spec->curdir();
123 output => $args{object_file} || File::Spec->catfile($srcdir, $basename) . $cf->{obj_ext},
164 my $to = join '', (File::Spec->splitpath($objects[0]))[0,1];
165 $to ||= File::Spec->curdir();
169 File::Spec->catfile($to, "$file_base.$cf->{dlext}");
196 $spec{srcdir} = File::Spec->canonpath( $spec{srcdir} );
197 $spec{builddir} = File::Spec->canonpath( $spec{builddir} );
199 $spec{output} ||= File::Spec->catfile( $spec{builddir},
202 $spec{implib} ||= File::Spec
[all...]
/openbsd-src/gnu/usr.bin/perl/cpan/AutoLoader/t/
H A D01AutoLoader.t11 use File::Spec;
17 $dir = File::Spec->catdir( "auto-$$" );
32 my $fulldir = File::Spec->catdir( $dir, 'auto', 'Foo' );
35 write_file( File::Spec->catfile( $fulldir, 'foo.al' ), <<'EOT' );
41 write_file( File::Spec->catfile( $fulldir, 'bazmarkhian.al' ), <<'EOT' );
51 write_file( File::Spec->catfile( $fulldir, 'blechanawilla.al' ), $blechanawilla_text );
54 write_file( File::Spec->catfile( $fulldir, 'blechanawil.al' ), $blechanawilla_text );
56 write_file( File::Spec->catfile( $fulldir, 'notreached.al' ), <<'EOT' );
114 write_file( File::Spec->catfile( $fulldir, 'a.al' ), <<'EOT' );
120 write_file( File::Spec->catfile( $fulldir, 'b.al' ), <<'EOT' );
[all …]
/openbsd-src/gnu/usr.bin/perl/cpan/ExtUtils-Install/lib/ExtUtils/
H A DInstall.pm10 use File::Spec;
106 my $Curdir = File::Spec->curdir;
414 my ($vol, $dirs, $file) = File::Spec->splitpath($dir,1);
415 my @dirs = File::Spec->splitdir($dirs);
416 unshift @dirs, File::Spec->curdir
417 unless File::Spec->file_name_is_absolute($dir);
423 $dir = File::Spec->catdir($vol,@dirs);
426 $dir = File::Spec->catdir(@dirs);
427 $dir = File::Spec->catpath($vol,$dir,'')
701 my $blib_lib = File::Spec->catdir('blib', 'lib');
[all …]
/openbsd-src/gnu/usr.bin/perl/dist/PathTools/lib/File/Spec/
H A DFunctions.pm1 package File::Spec::Functions;
3 use File::Spec;
38 require File::Spec::Unix;
51 my $sub = File::Spec->can($meth);
53 if (exists($udeps{$meth}) && $sub == File::Spec::Unix->can($meth) &&
55 File::Spec->can($_) != File::Spec::Unix->can($_)
57 defined(&{"File::Spec::Unix::_fn_$meth"})) {
58 *{$meth} = \&{"File::Spec::Unix::_fn_$meth"};
60 *{$meth} = sub {&$sub('File::Spec',
[all...]
/openbsd-src/gnu/usr.bin/perl/cpan/ExtUtils-Install/t/lib/MakeMaker/Test/
H A DUtils.pm4 use File::Spec;
114 my $perlpath = File::Spec->rel2abs( $perl );
123 foreach my $path (File::Spec->path) {
124 $perlpath = File::Spec->catfile($path, $perl);
151 File::Spec->rel2abs($_) } split quotemeta($Config{path_sep}), $ENV{PERL5LIB};
152 @INC = map { File::Spec->rel2abs($_) } @INC;
155 $lib = File::Spec->rel2abs($lib);
418 require File::Spec;
423 if( File::Spec->file_name_is_absolute($command) ) {
428 File::Spec->path,
[all …]
/openbsd-src/gnu/usr.bin/perl/dist/ExtUtils-ParseXS/t/
H A D600-t-compat.t18 use File::Spec;
20 my $path_prefix = File::Spec->catdir(-d 't' ? qw(t data) : qw(data));
26 File::Spec->catfile($path_prefix, "conflicting.typemap"),
29 File::Spec->catfile($path_prefix, "other.typemap"),
35 File::Spec->catfile($path_prefix, "b.typemap"),
42 File::Spec->catfile($path_prefix, "b.typemap"),
45 File::Spec->catfile($path_prefix, "perl.typemap"),
51 File::Spec->catfile($path_prefix, "b.typemap"),
54 File::Spec->catfile($path_prefix, "perl.typemap"),
55 File::Spec->catfile($path_prefix, "b.typemap"),
/openbsd-src/gnu/usr.bin/perl/lib/
H A Dblib.pm40 use File::Spec;
66 $dir = File::Spec->curdir unless ($dir);
78 $blib = File::Spec->catdir($dir, "blib");
79 $blib_lib = File::Spec->catdir($blib, "lib");
80 $blib_arch = File::Spec->catdir($blib, "arch");
88 $dir = File::Spec->catdir($dir, File::Spec->updir);
/openbsd-src/gnu/usr.bin/perl/cpan/podlators/t/man/
H A Dencoding.t27 use File::Spec;
40 my $input = File::Spec->catfile('t', 'data', 'man', 'encoding.pod');
43 groff => File::Spec->catfile('t', 'data', 'man', 'encoding.groff'),
44 roff => File::Spec->catfile('t', 'data', 'man', 'encoding.roff'),
45 utf8 => File::Spec->catfile('t', 'data', 'man', 'encoding.utf8'),
68 my $tmpdir = File::Spec->catdir('t', 'tmp');
72 my $outfile = File::Spec->catfile('t', 'tmp', "encoding$$.$encoding");

12345678910>>...24