$mail =~ tr/\r\n//d; とでもしとけ。