Perl 中的文件操作:删除和重命名

许多系统管理员出身的程序员,即使写Perl程序,也喜欢间接利用rmcp 和 mv 来完成文件操作。 虽然这是可行的,但是没有充分利用Perl本身的威力。本节我们学习怎样用Perl内置的函数完成此类操作。

移除

unlink 可以移除一个或者多个文件。

 
  
  1. unlink $file;
  2. unlink @files;

如果没有显示地给出参数,默认的参数为$_, 参见Perl 中的默认值。

更多信息请参考 perldoc -f unlink.

重命名

Perl自带的函数为 rename

 
  
  1. rename $old_name, $new_name;

File::Copy 模块中的move 函数比 rename 支持更多文件系统,因此是在某写情况下,是更好的选择。

 
  
  1. use File::Copy qw(move);
  2.  
  3. move $old_name, $new_name;

更多文档:

perldoc -f rename.

perldoc File::Copy.

复制

Perl 中没有对应的函数来完成复制操作。通常用 File::Copy 模块中的copy 函数

 
  
  1. use File::Copy qw(copy);
  2.  
  3. copy $old_file, $new_file;

参见: perldoc File::Copy.

原文链接: http://cn.perlmaven.com/how-to-remove-copy-or-rename-a-file-with-perl

你可能感兴趣的:(【编程语言】)