RosettaCodeData/Task/Loops-For/Perl-6/loops-for-3.pl6

([\~] "*" xx 5).join("\n").say;