in reply to Re^4: PERL $/variablein thread PERL $/variable
while (<$fh>) { chomp; next if !length; ... } [download]