Perl的File::Temp模块简约说明

Perl的File::Temp模块简约说明

require File::Temp;

use File::Temp ();

use File::Temp qw/ :seekable /;

$fh = File::Temp->new();

$fname = $fh->filename;

$fh = File::Temp->new(TEMPLATE => $template);

$fname = $fh->filename;

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

print $tmp "Some data\n";

print "Filename is $tmp\n";

$tmp->seek( 0, SEEK_END );

用法

说明脚本(适用于window和UNIX)

脚本一，01.pl

脚本二，02.pl

简介

new创建一个对象

my $tmp = new File::Temp();

或者

my $tmp = File::Temp->new();

可以跟的参数有:

TEMPLATE（或以跟至少四位的变量，用X表示） DIR SUFFIX UNLINK(0或1)

方法

filename 返回临时文件的文件名

接着上面的例子

my $FileName = $tmp->filename;

unlink_on_destroy 控制文件在使用过后是否删除

$fh->unlink_on_destroy(1);

DESTROY 如果对象超出范围，会删除文件，这个与unlink_on_destroy类似

unlink_on_destroy和DESTROY，在当变量$KEEP_ALL为真时，不会生效

函数

tmpfile 创建一个临时文件

use File::Temp qw(tempfile);

...

my $fh = tempfile();

或者

创建一个文件，目录由File::Spec模块的tempdir()函数指定

my ($fh, $filename) = tempfile();

版权声明：本文内容由网络用户投稿，版权归原作者所有，本站不拥有其著作权，亦不承担相应法律责任。如果您发现本站中有涉嫌抄袭或描述失实的内容，请联系我们jiasou666@gmail.com 处理，核实后本网站将在24小时内删除侵权内容。