binmode STDOUT;
local $/;
$_ = <>;
s/\s+//g;  # Adjust to filter out irrelevant stuff.
print pack 'H*', $_;

##</code><code>##

print "\x00" x $offset;