$line =~ tr/\t\n\r"/\x09\x0A\x0D'/;