Wrap your data in a hash:

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

my $list_ref = $list{$name};
[download]

Your intent could also be satisfied with a symbolic reference dereference, but that would be too dirty. Just so you recognise dirt when you see it,

my $list_ref = \@{$name};
[download]