Help for this page
for ($i=1 ;$i<=$number ; $i++) { ... }
foreach $i (1..$count) { ... }
foreach my $i (1..$count) { ... }