Perl Contests

[Leif Sawyer]

Heh.. as i said, it's taken from the camel book, and they don't have
a tilde anywhere on that line.. :-)

I'm guessing that you mean =~ ?  it's not a modifier tho, but
an assignment from a match..   besides, adding the ~ in this case
causes the assignment to fail, so it ends up printing exactly
the input.. 

> -----Original Message-----
> From: corliss at alaskapm.org [mailto:corliss at alaskapm.org]
> Sent: Monday, November 29, 1999 3:01 PM
> To: Leif Sawyer
> Cc: Alaska Perl Mongers
> Subject: RE: Perl Contests
> 
> 
> On Mon, 29 Nov 1999, Leif Sawyer wrote:
> 
> > Well, helpfull, i guess.. obfuscated is hard to do, 
> usually.. both are
> > great!
> > 
> > from  Camel 4.0:
> > 
> >        perl -ne 'print if /\S/ || !$s; $s = /^\s*$/;'
> > 
> > Which is great to pipe CPP into, because all those blank
> > lines get squeezed into one..
> 
> Forgot a tilde in the last statement. . .  ;-)
> 
> 	--Arthur Corliss
> 	  Perl Monger/Alaska Perl Mongers
> 	  http://www.alaskapm.org/
> 
> =================================================
> Mailing list info:  If at any time you wish to (un|re)subscribe to
> the list send the request to majordomo at hfb.pm.org.  All requests
> should be in the body, and look like such
>                   subscribe anchorage-pm-list
>                   unsubscribe anchorage-pm-list
> 
=================================================
Mailing list info:  If at any time you wish to (un|re)subscribe to
the list send the request to majordomo at hfb.pm.org.  All requests
should be in the body, and look like such
                  subscribe anchorage-pm-list
                  unsubscribe anchorage-pm-list