Searched refs:tempdir (Results 1 - 5 of 5) sorted by relevance
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/File/Temp/t/ |
H A D | tempfile.t | 35 use File::Temp qw/ tempfile tempdir/; 59 my $tempdir = tempdir( $template , 64 print "# TEMPDIR: $tempdir\n"; 66 ok( (-d $tempdir) ); 67 push(@dirs, $tempdir); 71 DIR => $tempdir, 84 DIR => $tempdir, 94 DIR => $tempdir, 106 DIR => $tempdir, [all...] |
H A D | object.t | 51 my $tempdir = File::Temp::tempdir( $template , 56 print "# TEMPDIR: $tempdir\n"; 58 ok( (-d $tempdir), "Does $tempdir directory exist" ); 59 push(@dirs, $tempdir); 63 DIR => $tempdir, 69 ok( (-f "$fh"), "File $fh exists in tempdir?"); 74 $fh = new File::Temp( DIR => $tempdir, UNLINK => 0 ); 77 ok( (-f "$fh" ), "Second file $fh exists in tempdir [nounlin [all...] |
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/Pod/ |
H A D | Perldoc.pm | 1028 my $tempdir = $ENV{'TEMP'}; 1029 return unless defined $tempdir and length $tempdir 1030 and -e $tempdir and -d _ and -w _; 1033 "Considering whether any old files of mine in $tempdir need unlinking.\n" 1036 opendir(TMPDIR, $tempdir) || return; 1051 push @to_unlink, "$tempdir/$filespec"; 1055 printf " $tempdir/$filespec is too recent (after %x)\n", $limit; 1059 print " $tempdir/$filespec doesn't look like a perldoc temp file.\n"; 1065 $tempdir [all...] |
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/File/ |
H A D | Temp.pm | 44 use File::Temp qw/ tempfile tempdir /; 46 $dir = tempdir( CLEANUP => 1 ); 99 file. The tempdir() function can be used to create a temporary 156 tempdir 821 # - Called by tempdir() if directories are to be removed on shutdown 1229 =item B<tempdir> 1234 $tempdir = tempdir(); 1238 $tempdir = tempdir( 1284 sub tempdir { subroutine [all...] |
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/utils/ |
H A D | c2ph.PL | 374 use File::Temp 'tempdir'; 485 $SAFEDIR = File::Temp::tempdir("c2ph.XXXXXX", TMPDIR => 1, CLEANUP => 1)
|
Completed in 38 milliseconds