develooper Front page | perl.golf | Postings from August 2002

Re: Son of (-ugene's Cantor

Thread Previous | Thread Next
From:
Andrew.Savige
Date:
August 21, 2002 00:41
Subject:
Re: Son of (-ugene's Cantor
Message ID:
694BB7191495D51183A9005004C0B05452DF30@ir-exchange-srv.ir.com.au
En op 18 augustus 2002 sprak Yorkshireman Piers Cawley:
> Tee hee.
>
>  -l $_=$"x2**pop;s'$'/\\',print,s/\\../$&^PC1^PLM/egwhile+s\^ \\
>
> I *thought* that lookbehind looked a little too long...

Ton always has the last laugh. Your solution does not work.
At least not for me.

Ton's output (argument 4):

               /\
              /\/\
             /\  /\
            /\/\/\/\
           /\      /\
          /\/\    /\/\
         /\  /\  /\  /\
        /\/\/\/\/\/\/\/\
       /\              /\
      /\/\            /\/\
     /\  /\          /\  /\
    /\/\/\/\        /\/\/\/\
   /\      /\      /\      /\
  /\/\    /\/\    /\/\    /\/\
 /\  /\  /\  /\  /\  /\  /\  /\
/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\

Piers' output (argument 4):

               /\
              /\/\
             /\  /\
            /\/\/\/\
           /\  /\  /\
          /\/\/\/\/\/\
         /\  /\  /\  /\
        /\/\/\/\/\/\/\/\
       /\  /\  /\  /\  /\
      /\/\/\/\/\/\/\/\/\/\
     /\  /\  /\  /\  /\  /\
    /\/\/\/\/\/\/\/\/\/\/\/\
   /\  /\  /\  /\  /\  /\  /\
  /\/\/\/\/\/\/\/\/\/\/\/\/\/\
 /\  /\  /\  /\  /\  /\  /\  /\
/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\

/-\ (my sig. is not part of Piers output ;)

Thread Previous | Thread Next


nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About