ports/textproc/p5-XML-Parser/files/check_nfs.pl
2021-04-06 16:31:13 +02:00

8 lines
175 B
Perl

#!/usr/bin/perl
use strict;
use warnings;
use File::Temp qw(tempfile);
my ($fh, $fn) = tempfile("check-XXXXXX", SUFFIX => '.tmp', TMPDIR => 1, UNLINK => 1);
#print "$fn\n";