in reply to Re: why doesn't "my ($a,$b)" return a list?
in thread why doesn't "my ($a,$b)" return a list?

no idea what you are talking about, I'm getting exactly the same results in list context like with an implicit assignment of undefs.

Using deref-operator \ is another case .

  DB<7> sub tst2  {print scalar @_ }
 
  DB<8> tst2( my ($a,$b,$c,$d))
4
  DB<10> tst2( my ($a,$b,$c))
3
  DB<11> tst2( my ($a,$b))
2
  DB<12> tst2( my ($a))
1
  DB<13> tst2( my ($a,$b,$c,$d)=(undef,undef,undef,undef))
4

[download]
 UPDATE: ah sorry never mind!

Cheers Rolf

In Section Seekers of Perl Wisdom