Select Code to Download

print "my %opcode_map = (\n";
print "LD$_ => [".join(',',$_*3,$_*5,$_*7)."],\n"
  foreach (1,2,3);
print ")\n";