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

##</code><code>##

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

##</code><code>##

# using scalars
my($name, $age, $birthday, $address, $zipcode, $city, $country) = @array;

# using hash
my @keys = qw(name age birthday address zipcode city country);
my %user;
@user{ @keys } = @array;

# so, instead of
print "name = $name\n";

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