$ perl -e '$n=3; print "$n: "; for (my $i=0; $i<$n; $i++) { print $i," "} print "\n"'
3: 0 1 2

$ perl -e '$n=3.14; print "$n: "; for (my $i=0; $i<$n; $i++) { print $i," "} print "\n"'
3.14: 0 1 2 3