in reply to Handle bunch of lines as a Handle
open my $fh, "<", \$e_mail or die; while (<$fh>) { # process line } [download]