Sam wrote: > > Thanks for all your responses; I learned a bit. > > 1. I wasn't clear on $_ in my email; that's being read elsewhere in program so > it's already set by the time print_lines is called. > > 2. Will you bet your life on this equivalence: "not /^\s*$/ == /\S/"?
Yes I will. :-) Another point that I just noticed is that you are using eof with the <> special readline operator. You DO realize that eof (without parenthesis) behaves differently than eof() or eof(ARGV) when using <>? John -- use Perl; program fulfillment -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>
