Select Code to Download

sub foo {
    my $self = shift;
...
        return undef;
    }
}

sub foo {
    my $self = shift;
...
    # Do stuff
    return $some_useful_value
}