Re: [perl #24176] inconsistent m/.../g behaviour

>>>>> 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
  %

-- 
andreas

• [perl #24176] inconsistent m/.../g behaviour by Jonathan Eisler
• Re: [perl #24176] inconsistent m/.../g behaviour by Andreas J Koenig
• Re: [perl #24176] inconsistent m/.../g behaviour by Graham Barr
• Re: [perl #24176] inconsistent m/.../g behaviour by Yitzchak Scott-Thoennes