Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl: the Markov chain saw
 
PerlMonks  

Re: Re: Re: Re: Triangle Golf

by petral (Curate)
on Apr 26, 2001 at 21:27 UTC ( #75832=note: print w/ replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    perl -ln0e's/\s+/ /g;print$"x(40-($c=2+length$&)/2),$&while/.{0$c,}? |
    +.+/g' a.txt w.txt
                                          a 
    ...
                          words only on spaces or new lines 
                        a a a a a a a a a a a a a a a a a a a 
                           a a a a a a a a a a a a a a a a 
    
  2. or download this
    print($"x(40-($c=2+length$&)/2),$&),$c*=($c<80)while...
    

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://75832]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others about the Monastery: (15)
As of 2014-09-23 17:03 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    How do you remember the number of days in each month?











    Results (232 votes), past polls