Select Code to Download

    $self->{'Big_List'} = [many elements];

sub GetBigList {
    my $self = shift;
...
        # do stuff to element, etc.
    }
}

sub SomeOperation {
    my $self = shift;
...
        # do stuff to element, etc.
    }
}