Home
last modified time | relevance | path

Searched refs:tempdir (Results 1 – 25 of 93) sorted by relevance

1234

/openbsd-src/gnu/usr.bin/perl/cpan/File-Temp/t/
H A Dtempfile.t60 my $tempdir = tempdir( $template ,
65 print "# TEMPDIR: $tempdir\n";
67 ok( (-d $tempdir), "Local tempdir exists" );
68 push(@dirs, File::Spec->rel2abs($tempdir));
70 my $tempdir2 = tempdir( TEMPLATE => "customXXXXX",
78 push(@dirs, File::Spec->rel2abs($tempdir));
82 DIR => $tempdir,
95 DIR => $tempdir,
105 DIR => $tempdir,
122 DIR => $tempdir,
[all …]
H A Dobject.t39 eval { File::Temp->tempdir };
81 my $tempdir = File::Temp::tempdir( $template ,
86 print "# TEMPDIR: $tempdir\n";
88 ok( (-d $tempdir), "Does $tempdir directory exist" );
89 push(@dirs, $tempdir);
93 DIR => $tempdir,
105 $fh = File::Temp->new( DIR => $tempdir, UNLINK => 0 );
114 DIR => $tempdir,
122 DIR => $tempdir,
/openbsd-src/gnu/usr.bin/perl/t/op/
H A Dunlink.t13 my $tempdir = tempfile;
15 mkdir $tempdir, 0700 or die "Can't mkdir '$tempdir': $!";
16 chdir $tempdir or die die "Can't chdir '$tempdir': $!";
38 rmdir $tempdir or die "Couldn't unlink tempdir '$tempdir': $!";
H A Ddump.t13 use File::Temp qw(tempdir);
35 my $tmp = tempdir(CLEANUP => 1);
/openbsd-src/gnu/usr.bin/perl/t/lib/
H A Dcommon.pl42 my $tempdir = tempfile;
44 mkdir $tempdir, 0700 or die "Can't mkdir '$tempdir': $!";
45 chdir $tempdir or die die "Can't chdir '$tempdir': $!";
51 rmtree($tempdir);
/openbsd-src/gnu/usr.bin/perl/cpan/Test-Simple/lib/Test2/IPC/Driver/
H A DFiles.pm9 use Test2::Util::HashBase qw{tempdir event_ids read_ids timeouts tid pid globals};
25 my $tmpdir = File::Temp::tempdir(
61 my $tempdir = $self->{+TEMPDIR};
73 return File::Spec->catfile($tempdir, $name);
156 my $tempdir = $self->{+TEMPDIR};
239 my $tempdir = $self->{+TEMPDIR};
241 opendir(my $dh, $tempdir) or $self->abort("could not open IPC temp dir ($tempdir)!");
389 my $tempdir = $self->{+TEMPDIR};
399 opendir(my $dh, $tempdir) o
[all...]
/openbsd-src/gnu/usr.bin/perl/cpan/Test-Simple/t/Test2/regression/
H A Dipc_files_abort_exit.t13 use File::Temp qw/tempdir/;
15 my $tempdir = tempdir(CLEANUP => 1);
17 open(my $stdout, '>', "$tempdir/stdout") or die "Could not open: $!";
18 open(my $stderr, '>', "$tempdir/stderr") or die "Could not open: $!";
28 my $tmpdir = test2_ipc()->tempdir;
42 open($stdout, '<', "$tempdir/stdout") or die "Could not open: $!";
43 open($stderr, '<', "$tempdir/stderr") or die "Could not open: $!";
/openbsd-src/gnu/usr.bin/perl/t/porting/
H A Dextrefs.t56 my $tempdir = tempfile();
58 mkdir $tempdir;
59 chdir $tempdir;
68 rmtree($tempdir);
121 rmtree($tempdir);
130 rmtree($tempdir);
/openbsd-src/gnu/usr.bin/texinfo/util/
H A Dtxitextest18 tempdir=/u/texinfo/@tests/testdir
27 --t*) shift; tempdir="$1";;
37 cd $tempdir || exit 1
H A Dtexindex.c100 char *tempdir; variable
317 tempdir = getenv ("TMPDIR"); in decode_command()
318 if (tempdir == NULL) in decode_command()
319 tempdir = getenv ("TEMP"); in decode_command()
320 if (tempdir == NULL) in decode_command()
321 tempdir = getenv ("TMP"); in decode_command()
322 if (tempdir == NULL) in decode_command()
323 tempdir = DEFAULT_TMPDIR; in decode_command()
325 tempdir = concat (tempdir, "/"); in decode_command()
[all...]
/openbsd-src/gnu/usr.bin/perl/lib/DBM_Filter/t/
H A D01error.t10 use File::Temp qw(tempdir);
12 my $tempdir;
14 $tempdir = tempdir( "./DBMFXXXXXXXX", CLEANUP => 1);
15 push @INC, $tempdir;
16 chdir $tempdir or die "Failed to chdir to '$tempdir': $!";
/openbsd-src/gnu/usr.bin/perl/cpan/File-Temp/lib/File/
H A DTemp.pm1142 my $tempdir = tempdir( @$maybe_template, %$args);
1146 my $real_dir = Cwd::abs_path( $tempdir );
1149 return bless { DIRNAME => $tempdir,
1639 sub tempdir { subroutine
1707 my $tempdir;
1720 unless ((undef, $tempdir) = _gettemp($template,
1728 if ( $options{'CLEANUP'} && -d $tempdir) {
1729 _deferred_unlink(undef, $tempdir, 1);
1733 return $tempdir;
/openbsd-src/gnu/usr.bin/perl/cpan/HTTP-Tiny/t/
H A D110_mirror.t17 my $tempdir = tempdir( TMPDIR => 1, CLEANUP => 1 );
18 my $tempfile = File::Spec->catfile( $tempdir, "tempfile.txt" );
/openbsd-src/gnu/usr.bin/perl/dist/ExtUtils-ParseXS/t/
H A D106-process_typemaps.t16 my $tdir = tempdir( CLEANUP => 1 );
30 my $tdir = tempdir( CLEANUP => 1 );
/openbsd-src/gnu/usr.bin/perl/cpan/DB_File/t/
H A Ddb-threads.t9 use File::Temp qw(tempdir) ;
28 my $TEMPDIR = tempdir( CLEANUP => 1 );
/openbsd-src/gnu/usr.bin/perl/cpan/Test-Simple/t/Test2/modules/IPC/Driver/
H A DFiles.t45 ok(-d $ipc->tempdir, "created temp dir");
52 my $hubfile = File::Spec->catfile($ipc->tempdir, "HUB" . ipc_separator . $hid);
73 opendir(my $dh, $ipc->tempdir) || die "Could not open tempdir: !?";
85 opendir($dh, $ipc->tempdir) || die "Could not open tempdir: !?";
91 ok(!-f $ipc->tempdir . '/' . $hid, "removed hub file");
97 my $tmpdir = $ipc->tempdir;
105 my $tmpdir = $ipc->tempdir;
151 $tmpdir = $ipc->tempdir;
[all...]
/openbsd-src/gnu/usr.bin/perl/cpan/ExtUtils-MakeMaker/t/lib/MakeMaker/Test/Setup/
H A DXS.pm20 my $tempdir = tempdir(DIR => getcwd, CLEANUP => 1);
21 chdir $tempdir;
/openbsd-src/gnu/usr.bin/perl/ext/File-Glob/t/
H A Dthreads.t24 use File::Temp qw(tempdir);
28 my($dir) = tempdir(CLEANUP => 1)
H A Drt114984.t4 use File::Temp 'tempdir';
17 my $path = tempdir uc cleanup => 1;
/openbsd-src/regress/bin/ksh/
H A Dth284 $tempdir = mkdtemp("${temp_dir}/rtd.XXXXXXXX");
320 &scrub_dir($tempdir) if defined $tempdir;
321 rmdir($tempdir) if defined $tempdir;
399 return undef if !&scrub_dir($tempdir);
412 if (!chdir($tempdir)) {
413 print STDERR "$prog: couldn't cd to $tempdir - $!\n";
/openbsd-src/gnu/usr.bin/perl/dist/IO/t/
H A Dio_dir.t4 use File::Temp qw( tempdir );
20 my $DIR = tempdir( CLEANUP => 1 );
/openbsd-src/gnu/usr.bin/perl/cpan/CPAN-Meta-YAML/t/
H A D21_yamlpm_compat.t35 my $tempdir = File::Temp->newdir("YTXXXXXX", TMPDIR => 1 );
36 my $filename = catfile($tempdir, 'compat');
/openbsd-src/gnu/usr.bin/perl/cpan/Win32API-File/t/
H A Dfile.t49 $tempdir = File::Spec->catdir($temp,$dir);
60 or die "# Can't create temp dir, $tempdir: $!\n";
61 print "# chdir $tempdir\n";
63 or die "# Can't cd to my dir, $tempdir: $!\n";
/openbsd-src/regress/usr.sbin/syslogd/
H A DSyslogd.pm50 my $dir = tempdir("syslogd-regress-XXXXXXXXXX",
54 $args{tempdir} = $dir;
246 if (my $dir = $self->{tempdir}) {
/openbsd-src/gnu/usr.bin/perl/dist/PathTools/t/
H A Dcwd_enoent.t6 use File::Temp qw(tempdir);
14 my $tmp = tempdir(CLEANUP => 1);

1234