Select Code to Download

my %list = {
    list1 => ["one","two","three","four"],
...
);

my $list_ref = $list{$name};

my $list_ref = \@{$name};