while ($requests = <REQUESTS>) { if ($requests ne '\n') { print MAIL "$requests"; } } [download]
In reply to removing carriage returns by chrisbarton