Select Code to Download

push @people, {
               id => $id,
...
               last => $last,
               age => $age,
              };

  DB<13>   $s = "003";

...
  DB<15> x %h
0  'string'
1  003