Select Code to Download

#!perl

...
# format output

print $formatted_output;

package Some::Module;
sub process {
...
  # do stuff;
  return $output;
}