my $hex = "5b 20 5a 2d 42 2d 46 20 5d 20 7e 20 4e 3a 6f 3a 52 3a 69"
    . "3a 53 20 7e 00 00 00 00 00 7c d6 ab 42";
$hex =~ tr/ //d;

print join ", ", unpack "Z*Lf", pack "H*", $hex;
print "\n";