Select Code to Download

# And for something completely different...
sub foo {
...
  # body of foo here.
  return $whatever;
}

sub foo {
    map {
...
        $whatever
    } @_
}

sub foo {
    (map {
...
        $whatever
     } @_)[0..$#_];
}

sub foo {
   my @ret = map {
...
   } @_;
   @ret[0..$#ret];
}