Select Code to Download

#!/usr/bin/perl
use 5.018;
use strict;
...
my $return = $method->Call('my ', 'potato');

print Dumper $return; # prints 'my potato'

#!/usr/bin/perl
use 5.018;
use strict;
...
# works(??): 'my potato'
my $x = unpack 'p', pack 'IN', $return;
print Dumper $x;

perl -v

This is perl 5, version 18, subversion 4 (v5.18.4) built for MSWin32-x
+64-multi-thread