my %lists = (
    list1 => [("one","two","three","four")],
    list1 => [("four","three","two","one")],
);

my $list_ref = $lists{$name};
....