Select Code to Download

## Note-- do not copy and paste! Read perlman:perlref.
sub get_stuff {
...
($array_ref, $hash_ref) = get_stuff;
@newarray = @$array_ref;
%hash = %$hash;

($array_ref, $hash_ref) = get_stuff;
my $first_element = $array_ref->[0];
my $thingy = $hash_ref->{'thingy'};