18:06:04.616 [79952.57692] <2> logparams: -S server1.prod.com -D server2.prod.com -C server3.prod.com -X -s 1421467204 -e 1421467204 -R E:\Program Files\725635\logs\log.tmp.chg -K -t 13 -M -k -L E:\Program Files\725635\logs\infod.tmp.log -W -f E:\Program Files\725635\logs\after.tmp 17:49:34.216 [58140.81564] <2> logparams: -S -l -a -k server1.prod.com -D client10.prod.com -C sql12.prod.com -X -s 1421467205 -e 1421467205 -R E:\Program Files\561234\logs\log.tmp.chg -K -t 13 -M -k -L E:\Program Files\561234\infod10.tmp.log -W -f E:\Program Files\561234\logs\after.tmp #### server1.prod.com,server2.prod.com,server3.prod.com,725635,infod.tmp.log server1.prod.com,client10.prod.com,sql12.prod.com,561234,infod10.tmp.log #### open(FILE, $filename) or die "Could not read from $filename, program halting."; while() { # get rid of the pesky newline character chomp; # read the fields in the current record into an array @fields = split(/[\s\\]+/, $_); $datestring = localtime(); open logreport, ">>E:\\temp\\logs\\eligiblereport.txt"; print logreport "$date,$fields[5],$fields[7],$fields[9],$fields[24],$fields[43]\n"; } close logreport; close FILE;