problems with "for" loop in perl

[newbie1006]

if ($string =~ /(.*?)u(.*)/s)
{

my $pre = $1;
my $post = $2;

for my $index(0..4)
{
print "$pre$index$post\n";
push(@register_list, "$pre$index$post");
}

}

is there a way to make it print like 0,1,2,3,4 and not just 1,2,3,4??

 

[1DMF]

If I use

for my $index(0..4) {
    print "$index\n";
    }

I get

0
1
2
3
4

"In complete darkness we are all the same, only our knowledge and wisdom separates us, don't let your eyes deceive you."

"If a shortcut was meant to be easy, it wouldn't be a shortcut, it would be the way!"

Google Rank Extractor -> Perl beta with FusionCharts