my ($hashref, $arrayref, @array) = new(); print $hashref->{'a'}; print $array[0]; print $arrayref->[1]; sub new { my $hashref = {'a' => '1'}; my @array = (2,3); my $arrayref = [4,5]; return ($hashref, $arrayref, @array); } #### ## $arrayref isn't defined! my ($hashref, @array, $arrayref) = new(); print $hashref->{'a'}; print $array[0]; print $arrayref->[1]; sub new { my $hashref = {'a' => '1'}; my @array = (2,3); my $arrayref = [4,5]; return ($hashref, @array, $arrayref); }