Perl Style: Break Complex Tasks Up

Jan 1, 1998 by Tom Christiansen

• Break subroutines into manageable pieces.

• Don’t try to fit everything into one regex.

• Play with your 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;
  

Forward to Break Programs into Separate Processes
Back to Loop Hoisting
Up to index

Copyright © 1998, Tom Christiansen All rights reserved.