Select Code to Download

foreach $key ( ($x eq 'key_1') ?  keys %my_hash : exists $my_hash($x) 
+? $x : () ) {
  do a bunch of stuff
}