Select Code to Download

($ver, $hlen, $tos, $len) = map { eval "0b$_" } unpack "A4A4A8A16", un
+pack("B*", $a);