Select Code to Download

my($stuff1, $stuff2) = @array; # eventough it has more than two elemen
+ts
my($stuff1, $stuff2) = @array;
# if you never use $stuff2 for the rest of your program, then you're w
+asting memory used by $stuff2.

# skipping the second and third elements
my($stuff1, undef, undef, $stuff4) = @array;

# using scalars
my($name, $age, $birthday, $address, $zipcode, $city, $country) = @arr
+ay;
...

# you can write
print "name = $user{name}\n";