my $n = 3.14159; for (my $i=0; $i<$n; $i++)

##</code><code>##

my $n = 3.14159; for (0..$n)

##</code><code>##