Select Code to Download

s/\".*\"//
my @F = split(/\s+/);

my @F = /(\" .*? \" | \S+)/gx

while (<>){

...
            s-sitename        = $5
END_FORMAT2
}

bash-2.05b$ ls -l SG*
-rwxr-xr-x    1 js       js       106236830 Mar  7 17:02 SG_CSGL02_mai
+n_470302220000.log.gz

bash-2.05b$ time gzip -dc SG* | ./test.pl >/dev/null 
6.96user 0.63system 1:32.95elapsed 8%CPU (0avgtext+0avgdata 0maxreside
+nt)k
0inputs+0outputs (94major+33minor)pagefaults 0swaps