Select Code to Download

@test = split (//,$something);
foreach (@test) {print "$_\n";}

for (split //, $something) {
  printf "%02X ", ord;
}

4A 00 4F 00 48 00 4E 00