This is perl, v5.6.1 built for MSWin32-x86-multi-thread
(with 1 registered patch, see perl -V for more detail)

Binary build 633 provided by ActiveState Corp. http://www.ActiveState.com
Built 21:33:05 Jun 17 2002

##</code><code>##

use strict;
use warnings;

my $string = 'abc' x ( 3 );

while( $string =~ /b/g ) {
    print "$-[0], $#-, $+[0], $#+\n";
}

##</code><code>##

C:\>test.pl
1, 2244604, 2, 0
4, 2244604, 5, 0
7, 2244604, 8, 0

C:\>test.pl
1, 2244628, 2, 0
4, 2244628, 5, 0
7, 2244628, 8, 0

C:\>test.pl
1, 2244628, 2, 0
4, 2244628, 5, 0
7, 2244628, 8, 0

C:\>test.pl
1, 2244628, 2, 0
4, 2244628, 5, 0
7, 2244628, 8, 0

##</code><code>##

This is perl, v5.6.1 built for i386-linux

[/d]$ perl test.pl
1, 56, 2, 0
4, 56, 5, 0
7, 56, 8, 0
[/d]$ perl test.pl
1, 56, 2, 0
4, 56, 5, 0
7, 56, 8, 0