/openbsd-current/gnu/usr.bin/perl/cpan/File-Temp/t/ |
H A D | tempfile.t | 2 # Test for File::Temp - tempfile function 36 use File::Temp qw/ tempfile tempdir/; 43 # Open tempfile in some directory, unlink at end 44 my ($fh, $tempfile) = tempfile( 49 ok( (-f $tempfile), "Tempfile exists" ); 52 ok( (-f $tempfile), "Tempfile exists" ); 54 push(@files, $tempfile); 81 ($fh, $tempfile) = tempfile( [all...] |
H A D | security.t | 19 use File::Temp qw/ tempfile unlink0 /; 77 # Create the tempfile 79 my ($fh1, $fname1) = eval { tempfile ( $template, 105 my ($fh2, $fname2) = eval { tempfile ($template, UNLINK => 1 ); };
|
/openbsd-current/gnu/usr.bin/perl/t/test_pl/ |
H A D | tempfile.t | 20 $check = tempfile(); 47 is( tempfile(), "${prefix}B"); 48 is( tempfile(), "${prefix}C"); 52 is( tempfile(), "${prefix}E", 'properly skips files that already exist'); 57 tempfile(); # allow the rest of the tests to work correctly 62 is( tempfile(), "${prefix}G", 'tempfile() properly skips files added with register_tempfile()' ); 66 is( tempfile(), "${prefix}Z", 'Last single letter filename'); 67 is( tempfile(), "${prefix}AA", 'First double letter filename'); 71 is( tempfile(), " [all...] |
/openbsd-current/gnu/usr.bin/perl/t/io/ |
H A D | iprefix.t | 12 my @tfiles = (tempfile(), tempfile(), tempfile());
|
H A D | inplace.t | 10 my @tfiles = (tempfile(), tempfile(), tempfile()); 37 our @ifiles = ( tempfile(), tempfile(), tempfile() ); 93 our $file = tempfile() ;
|
H A D | dup.t | 20 my $tempfile = tempfile(); 22 open(STDOUT,">$tempfile") || die "Can't open stdout"; 49 if ($^O eq 'MSWin32') { print `type $tempfile` } 50 elsif ($^O eq 'VMS') { system "type $tempfile.;" } # TYPE defaults to .LIS when there is no extension 51 else { system "cat $tempfile" } 101 open(G, ">$tempfile") or die; 117 open(G, "<$tempfile") or die; 125 open UTFOUT, '>:utf8', $tempfile or die $!; 135 open(UTFIN, "<:utf8", $tempfile) o [all...] |
H A D | read.t | 15 my $tmpfile = tempfile();
|
H A D | defout.t | 52 my $t = tempfile;
|
/openbsd-current/gnu/usr.bin/perl/cpan/Test-Harness/t/compat/ |
H A D | subclass.t | 25 my $tempfile = "_check_subclass_t.tmp"; 26 open TEST, ">$tempfile"; 30 END { unlink $tempfile; } 35 = Test::Harness::execute_tests( tests => [$tempfile] );
|
/openbsd-current/usr.bin/mktemp/ |
H A D | mktemp.c | 38 char *base, *cp, *template, *tempfile, *prefix = _PATH_TMP; local 110 if (asprintf(&tempfile, "%.*s/%s", (int)len, prefix, template) == -1) 111 tempfile = NULL; 113 tempfile = strdup(template); 115 if (tempfile == NULL) 119 if (mkdtemps(tempfile, suffixlen) == NULL) 120 fatal("cannot make temp dir %s", tempfile); 122 (void)rmdir(tempfile); 124 if ((fd = mkstemps(tempfile, suffixlen)) == -1) 125 fatal("cannot make temp file %s", tempfile); [all...] |
/openbsd-current/gnu/usr.bin/texinfo/util/ |
H A D | fixfonts | 32 tempfile="${TMPDIR}/circ$$" 36 #trap 'rm -f "${tempfile}" "${tempfile2}"' 0 1 2 3 15 39 (cd "${texfontdir}"; find . -name '*circle*' -print > "${tempfile}") 42 if grep 'lcircle10\.tfm' "${tempfile}" > /dev/null 2>&1 ; then 49 grep 'circle10\.tfm' "${tempfile}" > "${tempfile2}" \ 66 for f in `grep 'circle10.*pk' "${tempfile}"` ; do 76 for f in `grep 'circle10.*gf' "${tempfile}"` ; do
|
/openbsd-current/gnu/usr.bin/perl/t/op/ |
H A D | hash-clear-placeholders.t | 18 my $tempfile = tempfile(); 22 open(STDERR, ">", $tempfile) || 23 die "Could not open '$tempfile' for write: $^E"; 37 open(my $fh, "<", $tempfile) || 38 die "Could not open '$tempfile' for read: $^E";
|
H A D | die_exit.t | 60 my $tempfile = tempfile(); 61 open STDERR, '>', $tempfile or die "Can't open temp error file $tempfile: $!";
|
H A D | unlink.t | 13 my $tempdir = tempfile;
|
/openbsd-current/gnu/usr.bin/perl/cpan/HTTP-Tiny/t/ |
H A D | 110_mirror.t | 18 my $tempfile = File::Spec->catfile( $tempdir, "tempfile.txt" ); 29 1 while unlink $tempfile; 52 open my $fh, ">", $tempfile; 54 utime $mtime, $mtime, $tempfile; 58 $timestamp{$url_basename} = (stat $tempfile)[9]; 70 my @call_args = %options ? ($url, $tempfile, \%options) : ($url, $tempfile); 85 ok( -e $tempfile, "$label file created" ); 89 is( (stat($tempfile))[ [all...] |
/openbsd-current/gnu/usr.bin/perl/ext/SDBM_File/t/ |
H A D | prep.t | 6 use File::Temp 'tempfile'; 9 my ($dirfh, $dirname) = tempfile(UNLINK => 1); 10 my ($pagfh, $pagname) = tempfile(UNLINK => 1);
|
/openbsd-current/gnu/usr.bin/perl/t/win32/ |
H A D | fs.t | 18 my $tmpfile1 = tempfile(); 19 my $tmpfile2 = tempfile();
|
/openbsd-current/gnu/usr.bin/perl/t/run/ |
H A D | script.t | 12 my $filename = tempfile();
|
/openbsd-current/gnu/usr.bin/perl/cpan/Digest/t/ |
H A D | base.t | 8 use File::Temp 'tempfile'; 63 my ( $fh, $tempfile ) = tempfile( UNLINK => 1 ); 68 open( my $fh2, $tempfile ) || die;
|
/openbsd-current/gnu/usr.bin/perl/cpan/ExtUtils-MakeMaker/t/ |
H A D | parse_abstract.t | 8 use File::Temp qw[tempfile]; 18 my ($fh,$file) = tempfile( DIR => 't', UNLINK => 1 );
|
/openbsd-current/gnu/usr.bin/perl/t/uni/ |
H A D | readline.t | 22 my $file = tempfile(); 58 my $file = tempfile();
|
/openbsd-current/gnu/llvm/lldb/utils/lldb-repro/ |
H A D | lldb-repro.py | 22 import tempfile namespace 42 reproducer_path = os.path.join(tempfile.gettempdir(), input_hash)
|
/openbsd-current/gnu/usr.bin/perl/t/lib/ |
H A D | common.pl | 42 my $tempdir = tempfile;
|
/openbsd-current/bin/pax/ |
H A D | pax.c | 99 char *tempfile; /* tempfile to use for mkstemp(3) */ variable 100 char *tempbase; /* basename of tempfile to use for mkstemp(3) */ 247 tempfile = malloc(tdlen + 1 + sizeof(_TFILE_BASE)); 248 if (tempfile == NULL) { 253 memcpy(tempfile, tmpdir, tdlen); 254 tempbase = tempfile + tdlen;
|
/openbsd-current/usr.bin/xinstall/ |
H A D | xinstall.c | 66 char pathbuf[PATH_MAX], tempfile[PATH_MAX]; variable 225 char *target_name = tempfile; 264 to_fd = create_tempfile(to_name, tempfile, sizeof(tempfile)); 266 err(1, "%s", tempfile); 269 copy(from_fd, from_name, to_fd, tempfile, from_sb.st_size, 273 strip(tempfile); 280 if ((to_fd = open(tempfile, O_RDONLY)) == -1) 297 (void)unlink(tempfile); 298 errc(1, serrno, "%s", tempfile); [all...] |