Perl 风格：将复杂任务拆分

1998年1月1日 by Tom Christiansen

• 将子例程拆分为可管理的小块。
• 不要试图将所有内容都塞入一个正则表达式。

• 玩转你的 ARGV

      # program expects envariables
      @ARGV = keys %ENV       unless @ARGV;
  
      # program  expects source code
      @ARGV = glob("*.[chyC]") unless @ARGV;
  
      # program tolerates gzipped files
      # from PCB 16.6
      @ARGV = map { /^\.(gz|Z)$/ ? "gzip -dc $_ |" : $_  } @ARGV;
  

转到 将程序拆分为单独的进程
返回到 循环提升
返回到 索引

版权 © 1998, Tom Christiansen 版权所有。