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

Re: It's so simple ! It can't be that hard !

Thread Previous | Thread Next
From:
perl-golf
Date:
July 31, 2002 16:48
Subject:
Re: It's so simple ! It can't be that hard !
Message ID:
ai9t2e$bm9$1@post.home.lunix
In article <3D489DD0.31941.3D979FD@localhost>,
	"Markus Laire" <markus.laire@nic.fi> writes:
> My first post here, and also first try in golfing so this isn't too good ;)
> 
> $/=pop;$,=pop;for$i(0..15){
> ($_=sprintf'%04b',$i)=~s/(.)(.)(.)(.)/$1$2\n$3$4\n/;
> y/01/.O/,print,last,if$/eq$1+$2.($3+$4)&&$,eq$1+$3.($2+$4)}
> 
> btw, how is the score calculated?
> 
Get a counting program at http://www.xs4all.nl/~thospel/golf/golfcount.pl,
General golf rules are at http://www.xs4all.nl/~thospel/golf/rules.html

Don't look around too much in that directory unless you want to find
the list of solutions to this problem though.

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