Oh! I see from the CB that you want to use a for loop:
print ' ' x (abs(2 - $_)), '*' x (3 - abs(2 - $_)), "\n" for 0 .. 4;
In reply to Re: asterisk pattern
by GrandFather
in thread asterisk pattern
by Monk_perl
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |