(my $good = $bad) =~ s/[\r\n'\x00]+//gs;