Select Code to Download

sub my_sub {
    my $self = shift;
...
    my $bar  = shift;

}

sub my_sub {
    my $self   = shift;
...
                'bar' => $bar,
                'baz' => $baz,
                'bork' => $bork});