$line =~ tr/\015//;
$line =~ tr/\n//;
$line =~ tr/\r//;