First of all: thanks Abigail!

Second: sorry for posting as Anonymous Monk, unfortunately Konqueror had me and broke my authentication. If I can recover that node by any mean I'll be thankful

Now back to Perl. Actually I am guilty, yes, but not of the sin you are accusing me :-). I didn't get, and probabily I still have to meditate about, the difference between lists and arrays. But I know what "context" means.

Otherwise, I wouldn't write:

$test = test() ;
@test = test() ;
print $test == scalar(@test)? "Yepa!\n" : "Nope!\n" ;
[download]

The idea under that snippet was: retrieve in scalar context and in list context; if $test matches scalar @test then surely we return @x.

About the return thing, you got a point: I forgot the golden rule if it seems a function, it is a function; moreover, I remembered return LIST from the docs, but it's return EXPR. I'm a sinner ;)

Last but not least, for everybody telling me about wantarray: you completely missed the point, but it probabily was my english's fault. I didn't tell I was looking for a way to write a better return statement. Instead, I was trying to test a return value of a sub/method, whoever wrote it. I can't enforce wantarray usage on people that is subclassing a class of mine.

Anyway, another lesson learnt. Thanks to everybody

Ciao!
--bronto

# Another Perl edition of a song:
# The End, by The Beatles
END {
  $you->take($love) eq $you->made($love) ;
}