I'll just latch onto one of your questions:
>Is there an easier way to test and print between two points in a file,
Yes, there is. I tried to explain it in from...to
In your case, I'd recommend you break out of the loop after you're finished with the tool:
while (<FOO_FILE>){ if (/$foo/){ $that = 1; } if (/$bar/){ last; # emergency exit from the loop ;-) } if ($that){ print $_; } }
You could also seperate it into two loops, one for searching for the tool, one for reading the lines for that tool.
while (<FOO_FILE>){ last if /$foo/; # ignore all lines until we find foo } while (<FOO_FILE>){ last if /$bar/; print $_; # do something with the lines we find now } close FOO_FILE; # just ignore the rest of the file
-- Brigitte 'I never met a chocolate I didnt like' Jellinek http://www.horus.com/~bjelli/ http://perlwelt.horus.at
In reply to Re: Reading entire file.
by bjelli
in thread Reading entire file.
by stuffy
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |