You might want to try:

print "Buffer returned : ". unpack('H*',$myBuf) . "\n";
[download]