References are your friend:

  
 my ( $array, $hash ) = get_stuff();
 foreach my $item ( @{ $array } ) {
   print "$item!\n";
 }

 foreach my $key ( keys %{ $hash } ) {
   print "$key: $hash->{ $key }\n";
 }

 ...

 sub get_stuff {
  ...
  return ( \@array, \%hash );
}
[download]

Check out perldoc perlref for the straight dope.

Chris
M-x auto-bs-mode