Select Code to Download

sub do_something {
    my( $self, %args ) = @_;
...
        ? @{ $args{list} 
        : $self->LIST;
}