$x = $i->gd;;
print unpack 'C*', $x;;