Select Code to Download

my @loads_of_stuff;
while ( my $line = <DATA> ) {
...
        push @loads_of_stuff, $1;
    }
}