>>>>> On 9 Oct 2003 18:38:39 -0000, Jonathan Eisler (via RT) <perlbug-followup@perl.org> said: > my $text = "Foo\nBar\n"; > while ( my ( $name ) = ( $text =~ /(\w+)/g ) ) { print $name, "\n" } Not a bug. Your parens change the context to LIST context. Watch this: % perl -e ' my $text = "Foo\nBar\n"; while ( my $name = ( $text =~ /(\w+)/g ) ) { print $name, "\n" } ' 1 1 % -- andreasThread Previous | Thread Next