如何在perl中获得唯一的文件名

Question

我想在一个目录中创建许多小文件，这些文件具有来自多个进程的唯一名称。理论上文件名可能是相同的，那么我该如何解释呢？我应该使用什么模块来实现此目的？文件应该被持久化。

Answer 1

您可能想使用 File::Temp 来实现此目的。

($fh, $filename) = tempfile($template, DIR => $your_dir, UNLINK => 0);

Answer 2

要使用的包是 File::Temp。

Answer 3

向每个文件附加时间戳，最多到毫秒：

#!/usr/local/bin/perl
use Time::HiRes qw(gettimeofday);

my $timestamp = int (gettimeofday * 1000);
print STDOUT "timestamp = $timestamp\n";
exit;

输出：

timestamp = 1227593060768

Answer 4

如果没有任何模块，您可以使用如下所示的内容： time() 。 “_”。兰特()

Answer 5

$$ 包含正在运行的 perl 程序的进程 ID。因此，它可以用在文件名中，以使它们至少在运行进程的实例之间是唯一的。