Select Code to Download

sub foo { one line sub: accessors and the like }

...
  with proper indentation
  ...
}

#!/usr/local/bin/perl

...

=cut