my $val; $val = &func[1]; print $val; sub func { qw ( just some list ); } [download]
In reply to index into list returned by subroutine by Anonymous Monk