$line =~ tr/\x0a\x0d//d;