tr/\r\n//d;
 next if $_ eq '';