Select Code to Download

{name => 'pm_multi_line_match.pl', size => 1025},
  'pm_multi_mod_distro_test' => {
    'My-Example' => {
      {name => 'Build.PL', size => 651},
...etc

#!/usr/bin/env perl

...
  }, $_[1]);
  $_[0]{$_[1]} = delete $_[0]{'.'};
}