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

  • 2
    点赞
  • 4
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值