my $null_byte = chr 0;