Perl 中的文件操作:删除和重命名
许多系统管理员出身的程序员,即使写Perl程序,也喜欢间接利用rm, cp 和 mv 来完成文件操作。 虽然这是可行的,但是没有充分利用Perl本身的威力。本节我们学习怎样用Perl内置的函数完成此类操作。
移除
unlink 可以移除一个或者多个文件。
unlink $file; unlink @files;
如果没有显示地给出参数,默认的参数为$_, 参见Perl 中的默认值。
更多信息请参考 perldoc -f unlink.
重命名
Perl自带的函数为 rename。
rename $old_name, $new_name;
File::Copy 模块中的move 函数比 rename 支持更多文件系统,因此是在某写情况下,是更好的选择。
use File::Copy qw(move); move $old_name, $new_name;
更多文档:
复制
Perl 中没有对应的函数来完成复制操作。通常用 File::Copy 模块中的copy 函数
use File::Copy qw(copy); copy $old_file, $new_file;
参见: perldoc File::Copy.
Published on 2012-08-24
If you have any comments or questions, feel free to post them on the source of this page in GitHub. Source on GitHub.
Comment on this post