my $null = chr(0);
print $in $null
print $in $artist;