RosettaCodeData/Task/Secure-temporary-file/Perl/secure-temporary-file-2.pl
2023-07-01 13:44:08 -04:00

4 lines
76 B
Perl

use File::Temp;
$fh = new File::Temp;
print $fh->filename, "\n";
close $fh;