...
$combined =~ s/[^\x00].*//s;
...