# works(??): 'my potato'
my $x = unpack 'p', pack 'N2', $return;
print Dumper $x;