$str = '\000';
$str =~ s/\000//g;