Select Code to Download

if (test_conditions(@info)) {
  eval(do_something(@info));
...
  # such as when test_conditions() fails...
  something_screwed_up();
}

print join(" ", map { sprintf "%#02x", $_ }unpack("C*",pack("L",0x1234
+5678)))