1

我目前正在这样做

my $tmpf = File::Temp->new;
$tmpf->unlink_on_destroy(1);

但似乎这可能更清洁.. 像

my $tmpf = File::Temp->new({unlink => 1});

像后者可能吗?

4

1 回答 1

4

您还可以在构造函数中设置此标志:

my $tmp = File::Temp->new( UNLINK => 1, SUFFIX => '.dat' );

但这是不必要的。从 perldoc File::Temp

默认情况下,对象的构造就像在没有选项的情况下调用 tempfile 一样,但是如果 UNLINK 设置为 true(默认值),则对象析构函数会删除临时文件的附加行为。

于 2010-12-15T11:18:58.917 回答