# process.pl # andy bingham # 14 April 2002 # open(INP, "log.txt") or die "cannot open input"; foreach $line () { # read in each line of INP #processing code goes here } close(INP); # # DONE #