tye: I think you're confusion stems from our bad examples :)

You are right in your assessment, but the code below should clarify this. Because we're localizing arguments to the sub, you can see how it returns the last evaluated statement. The code below will print "his hat" (without the quotes):

use strict;
my @list = qw( this that foo bar );
print join ' ', mungeIt( @list );

sub mungeIt {
    my @localList = @_;
    my @stuff = map { s/th/h/ ? $_ : () } @localList;
}
[download]

Cheers,
Ovid

Update: Oh! I misunderstood tye's question, but clarified the answer. Oh well. All's well that ends well.

Join the Perlmonks Setiathome Group or just click on the the link and check out our stats.