Re: [FWP] JAPH

[Joey Mitchell Comeau <aw096@chebucto.ns.ca>]

On my machine the last 3 lines output buy the code are;


Justher Prel hacker,
Justher Prel hacker,
another Perl hacker,
[joey@7of9 joey]$ 

It is fun to watch, though.

[joey]

perl -e 'print "yes"&"no"for(1..3)'

On Sun, 17 Dec 2000, Ilmari Karonen wrote:

> 
> 
> On Fri, 15 Dec 2000, Joey Mitchell Comeau wrote:
> > 
> > perl -e '$_=$\=" perl hacker,";$_&="B";$_|=("B"|"H");$_|="Just another";print;'
> 
> $|=@c=1..25;@t=split//,",rekcah lreP rehtona tsuJ";for(1..300){$r=rand$#t;$c
> [$r]>$c[$n=$r+1]?redo:print@t,"\r";select$,,$,,$,,.1;(@c[$r,$n],@t[$r,$n])=(
> @c[$n,$r],@t[$n,$r])}print@t,"\n"
> 
> Not really all that twisted or obfuscated, but fun to watch.
> 
> -- 
> Ilmari Karonen - http://www.sci.fi/~iltzu/
> "Outside, in the big wide world, proof by infinite repetition and proof by
>  vehement assertion are much more prevalent."    -- Rik Steenwinkel in SDM
> 
> 
> 
> ==== Want to unsubscribe from Fun With Perl?  Well, if you insist...
> ==== Send email to <fwp-request@technofile.org> with message _body_
> ====   unsubscribe
> 


==== Want to unsubscribe from Fun With Perl?  Well, if you insist...
==== Send email to <fwp-request@technofile.org> with message _body_
====   unsubscribe