in reply to Re: outputting fun
in thread outputting fun
Just would like to say that Iam a wingnut :)
lindex
p.s. I broke it into multi-line so that it was readable :)for(my($c)=71,my($i)=0; $c >= 65; $c--,$i++) { print ( (chr(65)..chr($c)), (' 'x($i+($i-1))), reverse(chr(65)..chr(($c==71)? $c-1 : $c)), "\n" ); }
/****************************/ jason@gost.net, wh@ckz.org http://jason.gost.net /*****************************/
|
---|
In Section
Seekers of Perl Wisdom