in reply to Re: Error message while reading from file
in thread Error message while reading from file

Why switch from while to foreach?

while (<EXP>) {
  next unless /\S/;
  ...
}

[download]
--
<http://dave.org.uk>

"The first rule of Perl club is you do not talk about Perl club."
-- Chip Salzenberg

In Section Seekers of Perl Wisdom