RosettaCodeData/Task/Loops-For/Perl/loops-for-3.pl

2 lines
34 B
Perl
Raw Permalink Normal View History

2018-06-22 20:57:24 +00:00
print ('*' x $_ . "\n") for 1..5;