|
|
| Perl Monk, Perl Meditation | |
| PerlMonks |
Re: Programming Contest (High School '87)by Kanji (Parson) |
| on May 11, 2001 at 23:31 UTC ( [id://79872]=note: print w/replies, xml ) | Need Help?? |
This is an archived low-energy page for bots and other anonmyous visitors. Please sign up if you are a human and want to interact.
I can get it down to 41 by juggling your code around and making use of the -l switch ... or 43 if you count the -l. :) print$"x(3-$_),"*"x($_*2+1)for 0..3,2,1,0--k.
In Section
Seekers of Perl Wisdom
|
|
||||||||||||||||||||||||