I get it on my windows 2k machine with ActiveState perl 5.8.3
I don't get it on my linux machines. All of them have the same kernel and Perl build:
andromeda:davidj tmp > cat test.pl
#!/usr/bin/perl
#
use strict;
use warnings;
my $string = "abc";
while( $string =~ /b/g ) {
print $#-, "\n";
}
andromeda:davidj tmp > ./test.pl
0
andromeda:davidj tmp > uname -a
Linux andromeda 2.6.11-gentoo-r5 #3 Sun Apr 24 03:22:46 MDT 2005 i686
+Intel(R) Pentium(R) M processor 1.60GHz GenuineIntel GNU/Linuxandrome
+da:davidj tmp > perl -V
Summary of my perl5 (revision 5 version 8 subversion 5) configuration:
Platform:
osname=linux, osvers=2.6.9-gentoo-r1, archname=i686-linux
uname='linux livecd 2.6.9-gentoo-r1 #1 smp thu nov 25 03:43:53 utc
+ 2004 i686 intel(r) pentium(r) m processor 1.60ghz genuineintel gnuli
+nux '