6 lines
72 B
Perl
6 lines
72 B
Perl
foreach (1..5) {
|
|
foreach (1..$_) {
|
|
print '*';
|
|
}
|
|
print "\n";
|
|
}
|