in reply to Remove Carriage Return

$line =~ s/\r?\n//;