To be more productive, I have written the
following Perl 5.6 program, ob.pl:
print'$_=\160\162\151\156\164',join('.',map{ord}map/./gs,),';s!\s!!g;s|t
|t\t|;eval'
Example use: perl ob.pl windows.txt windows.pl
where windows.txt contains the text to be
output by the obsfucated windows.pl.
After
Ian Phillipps wrote:
What *is* the world's shortest JAPH, anyway? I would be disappointed if
it were just 'print '
If we ban external programs, is this the shortest?
dieJust another Perl hacker
Note the elegant embedding of newline inside the quotes
(saves a character over \n :-).
Bart Lateur wrote:
But how is the japh generated from this code? Are you saying there's a
banner program that turns plain source into this kind of weird shit?
Still with the original functionality as a perl script?
OK, I admit I am working on such a program.
I blame Japhy, who posted on
Ryan King wrote:
Well, tonight I made a caricature version, only to find out that
I missed the boat by one while: He already got a picture.
Crab suggested that I send it anyway, so here it is:
Who is Crab? Anyway, I'd like to thank him because you haven't
missed the boat. I have included your
Robert G. Werner wrote:
That one is easily recognizable, although, don't his glasses need ear
pieces?
Here is Larry with his glasses fixed, plus a new mystery man.
Can you identify him?
''=~('('.'?'.'{'
.('`'|'%').('['^\-).(
Robert G. Werner wrote:
That one is easily recognizable, although, don't his glasses need ear
pieces?
Here is Larry with his glasses fixed, plus a new mystery man.
Can you identify him?
''=~('('.'?'.'{'
.('`'|'%').('['^\-).(
[EMAIL PROTECTED] wrote:
Here is [...] a new mystery man.
Can you identify him?
Philip Newton wrote:
Dr. Damian?
Yes, I traced the photo from his web site.
Andrew.
Does anyone recognize this Perl hacker?
''=~('('.'?'.'{'.('['
^'+').('['^')').('`'|')').(
'`'|'.').('['^'/').''.('`'^'*')
.('[' ^'.')
.('[' ^'(')
Why is a camel associated with Perl?
Is it just that O'Reilly happened to choose
a camel for the cover of Programming Perl?
And why one hump and not two?
I also noticed CPAN Acme::Pony and Acme::Buffy.
Why Pony? (as opposed to some other animal)
Why Buffy? (as opposed to some other TV sitcom)
Yanick wrote:
From the ludicrous department:
perl -p0 -e'1while s/.*?\n(.*\n).+\n?/$1/s;s/\n.*//'
If you want to play golf, I claim a 2-stroke lead:
perl -p0 -e'1while s/.*?\n(.*\n).+\n?/$1/s;s/\n.*//' (Yanick)
perl -p0 -e'$n=y|\n||1;s/(.*\n){$n}//;s/\n.*//s'(Andrew)
Andrew.
Please take pity on Santa, on holiday here in Melbourne,
with only a Windows 98 pussbox to play with and limited
and very slow Internet access :-(.
Now, apart from an unfortunate underarm bowling incident
in cricket, we Aussies pride ourselves on good sportsmanship
(we just lost the Davis Cup
Yellow Jersey Melbourne-Time
- --
103 Ronald J Kimball 04:32 03-Dec-2001
101 Keith C Ivey 07:58
95 Rick Delaney 08:51
93 Eugene van der Pijll 08:55
Rick was the first the break the 100 barrier but had
just four
Here's one prediction I got wrong:
Japhy is cleverly using Ronald's slipstream: every time
Ronald moves forward, Japhy goes with him (so I expect
Japhy to post 95 soon:).
No! He has gone ahead to 94!
Now Ronald can use his slipstream :)
Yellow Jersey Melbourne-Time
-
Simon Drabble wrote:
darn :(
I have enough angst already with my 42-stroke mid.pl
In the interests of reducing your angst, I am happy
to confirm that 42 on the treacherous 4th hole (mid.pl)
is a triple-bogey ;-)
Santa.
This game has proved more popular than I expected!
I am travelling for the next day or so and my family
are starting to ask what am I doing locked away in the
computer room. So, please keep sending me your entries,
but in the interests of torturing your opponents, feel
free to also post your
Piers Cawley wrote:
Too bloody right he will. You've just moved the goalposts again. All
of a sudden printing to stderr is worth a 4 stroke penalty, when last
time it was only worth one. Yes, I know that head.pl dies. But only
after it's passed the test. And if I change it so that it doesn't
Hurrah! I am back in sunny Sydney again, 23 degrees.
Plus a proper operating system; if I never use Windows 98
again, it will be too soon (can't even redirect stderr, sigh).
Top priority is leaderboard update since it has been over a day now.
We now have 20 competitors! I would like to encourage
When to end the torture?
On one hand, I want to give more people a chance to enter.
Some may have been away the last couple of days; others may
have been too busy to get to it yet. OK, there is some ego
in this too -- I might get in the Guinness Book of Records
as Arbiter of the biggest golf
Keith C. Ivey wrote:
I'm not unhappy, but it seems an unnecessary restriction. An
alternative would be to change GolfScore() to something like
sub GolfScore {
my $script = shift;
open(FF, $script) or die error: open '$script';
local($/, $_);
$_ = FF;
close(FF);
Piers Cawley wrote:
I think the particular 'creative in the extreme' entry that Andrew was
referring to was my head.pl that printed 10 lines then crashed using:
#!perl -p
11..
Yes indeed. When I first saw that I fell off my chair laughing.
When I was finally able to pick myself up
Current Leaderboard
---
1. 89Eugene van der Pijll
2. 92Piers Cawley
3. 92Rick Klement
4. 92Japhy
5. 94Yanick
6. 94Rick Delaney
7. 94^ Damian James
8. 95Ronald J Kimball
9. 95Robin Houston
10. 95- BooK
11. 97
Eugene van der Pijll wrote:
Just post the entries of the top-5 to fwp, and let everyone comment,
including the competitors.
You're right; it's the Perl way. I am sure the competitors can
agree among themselves. In the unlikely event of a dispute,
I can call in the independent experts for a
Now that Eugene has shown great sportsmanship in revealing
the lowest scores for each hole, I am free to reveal the
current hole leaders.
Significantly, Ronald J Kimball, Japhy and Rick Delaney all
won their holes on their first posts of the game, just hours
after it was announced! I think that
Santa checking in.
It's 5:15 AM here in Sydney (not sunny yet;-).
Still, I've got my 6-pack of beer ready.
When this is over, I'll drink a toast to the winners,
then go the the beach :).
Current Leaderboard
---
1. 89Eugene van der Pijll
2. 91Piers Cawley
3.
Oops, sorry, yes we are on daylight savings.
Corrected to 3 hours to go (approx 2 1/2 hours now).
Santa
-Original Message-
From: Eugene van der Pijll [mailto:[EMAIL PROTECTED]]
Sent: Friday, December 07, 2001 7:20 AM
To: [EMAIL PROTECTED]
Cc: [EMAIL PROTECTED]
Subject: Re: The Santa
This is the hole that won it for Eugene.
In fact, he was the only golfer to find a 13-stroke solution.
As you might expect, just about everybody chose the obvious FAQ
solution.
I almost did not include this hole; I only put it in only because
I was originally designing Santa's course for
We should call this Piers' hole :-).
In one of the most generous gestures in the history of golf,
he published his now infamous use.perl.org journal entry,
effectively giving the whole field the best solution.
But I will always remember this hole for his surreal:
#!perl -p
11..
That said, Rick
This hole was one by Ronald J Kimball with his first post
in the opening hours of the game.
It proved frustrating, as evidenced by Japhy's mid-game comment:
Geez, I have three different solutions for tail.pl, ALL the
same length (19 chars). Has someone gotten below 19?
Japhy was able to go
This hole was one by Japhy with his first post in the opening
hours of the game.
Like hole 2, this proved very frustrating with all attempts
to improve on printf failing. BooK, in particular, made repeated
heroic attempts:
My wc.pl is 21, but uses printf. I tried many things to get rid of
This hole, arguably the most interesting of the set, was
won by Eugene with his first post in the opening hours
of the game. He got off to a fast start because he had
just analysed a similar problem from a previous fwp
middle line thread (in fact, I blame Yanick for this
golf game, and he blames
There were no leaderboard changes in the last hour, so I won't repost.
I would like to congratulate Eugene for his brilliant victory
and the worthy hole winners too: Ronald, Japhy and Rick.
I would especially like to thank everyone for their encouragement and
support and for the spirit that the
Andrew Savige wrote:
I am mentioning this because it may affect the scoring rule
if a golf solution uses the -F option. I suggest you allow
the null-terminate hack and subtract one from the golf score
(because you do not require the terminating null when you
run directly from the command
The dreaded leading dot glitch (first pointed out by Ian Phillipps)
has come back to haunt us. Note the two leading dots in the 6th line
...('{'^ '[').('`'^'#').('`'|'(').('['^')').('`'|')'). (('[')^
There should only be one dot.
So I will try again, this time indented by one space:
Hint: she is not a Perl hacker (to the best of my knowledge).
''=~('('.'?'
.'{'.('['^\+).(
'['^')').('`'|')').(
'`' | '.'
).(( '['
)^+ ( '/'
)).
I've had quite a few responses, some private, some to the list.
One entrant answered: 'heidi'. Checking google, that could mean:
1) The pop singer 'Killing Heidi'
2) Heidi Wall, relative of the father of Perl
3) Heidi Wall, the champion college golfer+
I am not sure if 2) and 3) are one and
David Henderson wrote:
I think it looks more like Sarah Michelle Gellar (TV's Buffy),
from one of the early season publicity shots which has been
used all over the place.
Now that Buffy has the most votes, I will quickly halt
the competition.
Num Votes Celebrity
- -
3
`/anick wrote:
The following is not very clever obfuscation, and it's not
the most palatable ASCII drawing ever drawn, but I suppose
it's good enough to elicit a few chuckles and/or groans.
Bart Lateur wrote:
On day 3, a bug becomes visible: the final line
And a partridge... suddenly
[EMAIL PROTECTED] wrote:
The first hole still seems to be the bane of most players, and no
beginner has yet succesfully finished it. And as you can see from
the scores even some experienced players struggle with it (in
particular Santa who submittted a placeholder entry so he would
at least
Andrew Savige wrote:
I am standing on the first tee with 2-wood in hand facing a
220-yard water carry into a stiff breeze. Now, this is a piece
of cake for the golfing greats, like Eugene and Spiff, but for
the average weekend hacker, it sets the knees trembling. After
hitting my first two
[EMAIL PROTECTED] wrote:
Final standing:
Spiff 131
Marcus Holland-Moritz 133
Autrijus Tang 135
Andrew Savige 137
Eugene van der Pijll138
Suo 138
Ian Phillipps 141
Piers Cawley146
Rick Klement
Thanks everybody for the feedback.
Unless there are strong objections,
I plan to run the game between:
Thu 24 Jan-Tue 29 Jan, 2002
More details closer to game start time.
/-\ndrew
The golf course is built.
Tee off time is exactly one week from now.
Game ends after 5 days, at the same time of day.
More detail will follow closer to tee off time.
/-\ndrew
Well, the course is now complete and I have a working test
program! I am just mowing the fairways and raking the bunkers
right now. It is a two hole course, a little tougher than
Santa's game, but not as tough as Ton's recent ircnet game at
Current Leaderboard
---
1. 92 Ronald J Kimball
2. 92 Rick Klement
Ronald's got company.
Hmm, maybe 92 is the limit of this game. ;-)
/-\ndrew
Current Leaderboard
---
1. 80 Tim Gim Yee
2. 84 Rick Klement
3. 85 Yanick
4. 92 Ronald J Kimball
Hole Leaders
Hole 1: Tim Gim Yee
Hole 2: Rick Klement, Tim Gim Yee, Yanick
Current Leaderboard
---
1. 77 Tim Gim Yee
2. 78 Eugene van der Pijll
3. 80 Yanick
4. 81 Rick Klement
5. 84 Keith C Ivey
6. 92 Ronald J Kimball
Beginner's Leaderboard
--
1. 127 Byron Jones
Hole Leaders
Hole 1: Tim Gim
Piers Cawley wrote:
I just found a bug in the test program by inspection. See below.
---
Hole 1 -- Get Even (even.pl)
Your program reads from a single input file and writes to
stdout; you are not permitted to write anything to stderr.
Matthew Byng-Maddick wrote:
I'm at 95, and I'm amazed to see the ones in the mid 80s on the
leaderboard.
I don't see where they can be cutting the strokes.
Just to *really* spoil your day, Rick Klement has just
surged ahead to 73!! And it is possible to go lower.
But this madness must stop
=
New test program teven.pl
=
Please find new test program, teven.pl, embedded below.
Minor bug fixes:
1) Win95/98 now prints expected number making it easier
to manually check gs.pl (thanks Tim Gim Yee).
2) gs.pl test data: Changed 'Great'
Current Leaderboard
---
1. 65 Eugene van der Pijll
2. 69 Rick Klement
3. 74 Keith C Ivey
4. 75 Ton Hospel
5. 77 Tim Gim Yee
6. 79 Wesley Darlington
7. 80 Yanick
8. 81 Matthew Byng-Maddick
9. 84 Daryl Olson
10. 84 sthoenna
11. 84
/
Just too good guys! First round to you.
Andrew Savige wrote:
If there are any other little rivalries or battles (or bets)
going on, please let us know.
I guess that makes two rivals for me in Eugene's game: Ton and Keith.
Actually, Keith's solutions are generally so original and artistic,
I don't
Current Leaderboard
---
1. 65 Eugene van der Pijll
2. 69 Rick Klement
3. 74 Keith C Ivey
4. 75 Ton Hospel
5. 77 Tim Gim Yee
6. 78^ Wesley Darlington
7. 80 Yanick
8. 81 Matthew Byng-Maddick
9. 81^ Sean McAfee
10. 84 Daryl Olson
11.
''=~('('.'?'.'{'.(
'['^'+').('['^')').('`'|
')').('`'|'.').('['^'/').''
.('`'^'#').('`'|'!').('`'|\.).(
'{'^'[').('['^'/').('`'|'(').(('`')|
')').('['^'(').('{'^'[').('`'|'-').('`'
Supremely Unorthodox/Artistic Prizes
When the game is over, I would like to allow a period of discussion
on the list before awarding the artistic prizes(s).
So as soon as you can after the game has finished, I would like
Current Leaderboard
---
1. 65 Eugene van der Pijll
2. 69 Rick Klement
3. 75 Ton Hospel
4. 75 Keith C Ivey
5. 77 Tim Gim Yee
6. 78 Wesley Darlington
7. 78 Honza Pazdziora
8. 78 Jan Yenya Kasprzak
9. 79^ Matthew Byng-Maddick
10. 80
Current Leaderboard
---
1. 65 Eugene van der Pijll
2. 69 Rick Klement
3. 75 Ton Hospel
4. 75 Keith C Ivey
5. 77 Tim Gim Yee
6. 78 Wesley Darlington
7. 78 Honza Pazdziora
8. 78 Jan Yenya Kasprzak
9. 79 Matthew Byng-Maddick
10. 80
Final Leaderboard
-
1. 65 Eugene van der Pijll
2. 69 Rick Klement
3. 75 Ton Hospel
4. 75 Keith C Ivey
5. 77 Tim Gim Yee
6. 78 Wesley Darlington
7. 78 Honza Pazdziora
8. 78 Jan Yenya Kasprzak
9. 79 Matthew Byng-Maddick
10. 80 Yanick
aaron Aaron Trickey
alaAla Qumsieh
assel Michael Assels
bart Bart Lateur
bobBest of Breed
book BooK
bouv Cedric Bouvier
briac Briac Pilpre
byng Matthew Byng-Maddick
byron Byron Jones
darli Wesley Darlington
eugen Eugene van der Pijll
evan Evan A Zacks
gask Patrick
aaron Aaron Trickey
alaAla Qumsieh
assel Michael Assels
bart Bart Lateur
bobBest of Breed
book BooK
bouv Cedric Bouvier
briac Briac Pilpre
byng Matthew Byng-Maddick
byron Byron Jones
darli Wesley Darlington
eugen Eugene van der Pijll
evan Evan A Zacks
gask Patrick
Philippe 'BooK' Bruhat wrote:
Other nice entries were the ones that used s/$/$/ while
aeiouy=~/.?/g I love this use of two different values of $
(which are equal, but not the same)
Rick Klement wrote:
When I found that s/$/$/g for my 44, I had the giggles
for a day :)
Rick, there were
On Tue, Jan 29, 2002 at 05:06:32PM +0100, Eugene van der Pijll wrote:
There is more going on than that. Why does Ton use the variable $| ? Any
other variable doesn't work...
Tony Bowden wrote:
This I really liked. I'd totally forgotten that $| only has 2 possible
values ...
I like it too.
I thought I would describe a little bit of background to the
tournament in case anyone is interested.
Unlike Santa's game, where I simply chose some standard utilities,
like head and tail, without any regard to golfing, this time I
wanted to cook an interesting golf hole.
To do that, I had to
Lian Claudiu Sebe wrote:
And since I've seen someone feeling bad about his position on the
leaderboard, I'd say it is more important to be on the board than just
lurking. While the top of the board can be crowded, it will always be
a guaranteed open spot right in the end of the list, just
Jean-Pierre Vidal wrote:
What is the definition of a beginner?
I think anybody is a beginner the first time (s)he plays golf.
Is this correct?
Well, I suppose it is up to the tournament host.
It will be interesting to see what Eugene does for
the Dutch Masters.
Since I have never actually
I am delighted to award the SUAP (Supremely Unorthodox Artistic
Prize) to Keith C Ivey.
There never was any doubt in my mind as to who made me laugh the
most during the entire tournament. It was Keith, locked away in
his laboratory like a mad scientist, writing all sorts of data
and code
I would like to acknowledge Rick Klement, Bart Lateur, Matthew
Byng-Maddick, Keith Ivey and Sean McAfee for all finding the
wacky Tall Trees/Toothpicks solution.
-p $_ x=$|--y|||c~(y|a|||y|e|||y|i|||y|o|||y|u|||y|y||) 57 klem
-nl ($.|y|||c|y|a|||y|e|||y|i|||y|o|||y|u|||y|y||)1||print 59 bart
We already have Tall Trees/Toothpicks:
-p $_ x=$|--y|||c~(y|a|||y|e|||y|i|||y|o|||y|u|||y|y||) 57 klem
-nl ($.|y|||c|y|a|||y|e|||y|i|||y|o|||y|u|||y|y||)1||print 59 bart
-n 1($.|~y|||c|y|a|||y|e|||y|i|||y|o|||y|u|||y|y||)||print 59 byng
-ln
To quote myself:
To these, I would like to add Ampersands of Time:
-p !($|--~ya~ye~yi~yo~yu~yyyc)ycd
Of course, this is better written as:
-p !($|--
ya
ye
yi
yo
yu
yy
yc)ycd
so that it resembles Journey Beyond the Stars.
Apologies for the blunder.
/-\ndrew
Pradeep Sethi wrote:
but it should work in case of 09/09/1973 also ?
How about this? (golfers, please don't laugh at me;-):
my $x = '9/8/1973';
my ($d, $m, $y) = $x =~ m!(\d\d?)/(\d\d?)/(\d+)! or
die invalid date\n;
my $z = sprintf(%.2d/%.2d/%d, $d, $m, $y);
print $z\n;
/-\ndrew
[EMAIL PROTECTED] wrote:
And while writing this text, i in fact found:
$_=aeiouy;s!!\n\$|--y-!g;print evalgrep$_--c,
Wow! 49 strokes without any unsightly command line options!
Notice that *every single* even.pl entry did, in fact,
have command line options.
/-\ndrew
Ronald J Kimball wrote:
$ is readonly; how about $ss;
Oh, All right!
-p !($|--
ya
ye
yi
yo
yu
yy
yc)ycd$ss$ss$s
ss$ss$s
ss$ss$s
ss$ss$s
ss$ss$s
ss$ss$s
ss$ss$s
ss$ss$s
ss$ss$s
ss$ss$s
And, for the sake of completeness, the final member of the gang
of four,
Jean-Pierre Vidal wrote:
I like Yanick's Zen approach, supported by Peter.
So do I.
Jean-Pierre Vidal wrote:
The Beginners'Leaderboard helped me to go on stage unashamed,
and this is its part (do you think so, Andrew ?).
I was shocked at how successful the Beginner's Leaderboard was.
I did
Bart Lateur wrote:
What the heck can *anybody* do to improve Eugene's solution?
When paricipating in Perl golf, he's virtually always in the lead.
I'll play, so long as I'm in Eugene's team. ;-)
A team game has never been tried (to my knowledge) so we cannot be
sure whether it is a good idea
Eugene van der Pijll wrote:
We probably need two programs: one for the arbiter, and one for the
golfers. The routines that they have in common can be put into a module,
but I'm not sure if that is the right thing to do. Installing a module
can be a problem, especially for beginners.
Jerome
Honza was the only golfer to find the clever trick of avoiding
eval by using the s///ee construct.
-nl s/|[aeiouy]/y!$!!c%2|$.%2next;'$'/gee;print 53 honza
I could not restrain myself from whittling this to 49 (see below).
We now have 5 quite different ways to break the 50 barrier!
-p $_
Jean-Pierre Vidal wrote:
The Beginners'Leaderboard helped me to go on stage unashamed,
and this is its part (do you think so, Andrew ?).
Andrew Savige wrote:
It worked wonderfully in this game because Peter Makholm,
Jason Parker and Stephen Turner staged an epic duel right up
to the final
John W. Krahn wrote:
Well, in _this_ case, the one-liner version is 33 characters and the
file version is 34 charcters.
`/anick wrote:
Oh... Really? I'm looking forward tomorrow and discovering
that thing, then. :)
If that 33 count includes the leading perl -e', I'll go
Ooooh
Stephen Turner wrote:
Can someone explain to me why
-l use POSIX;print strtol pop,36
doesn't work? Where does the extra 0 come from?
To quote myself to Dave and Jerome:
BTW, because I felt you were already inundated with queries about
it, I did not bother you with what seems to be a Perl
Rick Klement wrote:
A modest suggestion for perl golf: no modules allowed.
If it's any consolation, Rick, I think most serious golfers
(well, me, at least;-) recognize those golfers who shot 46
and 47 without using any modules or external commands.
I tried hard, but could not break 50. :-( I
Andrew Savige wrote:
#!/usr/bin/perl -l
use POSIX;print strtol pop,36
I think this should work, but it prints a spurious trailing zero.
Ronald J Kimball wrote:
RTFM.
strtol String to (long) integer translation. Returns the
parsed number and the number
On Sat, 16 Feb 2002 11:10:17 +0100, F. Xavier Noria wrote:
: What an anti-climax. Utterly boring.
Maybe being a mathematician I am a bit formalist, but the challenge was
to use as few strokes as possible, if you didn't use strtol you lost. If
you didn't want to use strtol as an option you are
Thankyou to Dave and Jerome for running the game and for
their invitation to explain some of my weird entries.
The fwp old-hands may have yawned at my 7918-stroke entry,
but I hope it caused at least a few fwp newbies to remark
What the hell is that? or How the hell does that work?.
Let me
Stephen Turner wrote:
Thanks for the explanation, Andrew. I'm interested to know how
you made the picture of Eugene during your golf competition.
I found the original photo, but how do you turn that into a line
drawing to work your magic on? Do you have to do it by hand?
For that photo, I
Stephen Turner wrote:
In that case, I think there should be a separate leaderboard for
people who didn't use strtol. Just so that I could be only one
stroke off the lead, you understand. :-)
2002/02/11 19:52:29 - 46 - Karsten aka Spifff
map$.=36*$.-55+/\d/*7+ord,pop=~/./g;print$..$/
Though singled out for submitting a whopping 9 entries, I could
not help but notice that specialist obfuscator BooK submitted more.
Luckily for me, however, he did not find the strtol hack, for he
would surely have tried for a T-shirt by producing a C is Perl
entry, just as he did in the 4th
Philip Newton wrote:
Well, existing compilers tend to be slow to implement new
standards such as C99
So for my purposes, standard C is ANSI C i.e. KR 2nd ed.. YMMV.
Interestingly, in this particular case, many vendors are very
*quick* to implement, often implementing before it happened.
Stephen Turner schreef op 20 februari 2002:
I'm still interested in seeing a real solution less than 46.
But maybe there isn't one.
Since we have had a positive sighting of Eugene whittling at the
RC4 solution, I doubt that it is possible. ;-)
I had visions of reliving Eugene's celebrated
Three more 46-ers:
map$.=36*$.-55+/\d/*7+ord,pop=~/./g;print$..$/spiff:46
map$\=(36*$\-55+/\d/*7+ord).$/,pop=~/./g;printGhost of
Eugene's reverse
map$\=36*$\-55+/\d/*7+ord().$/,pop=~/./g;printGhost of
Two more:
$a=$a*36+(30+ord lc)%39for pop=~/./g;print$a,$/ ton:47
$\=$\*36+(30+ord lc)%39 .$/for pop=~/./g;print ton's ghost:46
$x=$x*36+(-9+ord)%39for split//,lc pop;print$x.$/ albert:49
$\=$\*36+(-9+ord lc)%39 .$/for pop=~/./g;print albert's ghost:46
Now the space after the 39
Ton Hospel schreef op 20 februari 2002:
$\=(30+ord lc)%39+36*$\.$/for pop=~/./g;print
Hey, that's 45! Stephen, are you happy now?
Ton, you are the best golf post-mortem analyst in the world. :)
/-\ndrew
Ton Hospel schreef op 21 februari 2002:
$\=(30+ord lc)%39+36*$\.$/for pop=~/./g;print
Hey, that's 45! Stephen, are you happy now?
Ton, you are the best golf post-mortem analyst in the world. :)
You did all the hard work, I just moved some chars around.
Eugene van der Pijll schreef op 3
Andrew Savige schreef op 22 februari 2002:
#!/usr/bin/perl -l
[pop=~/.(?{$a=$a*36+(ord(lc$)-9)%39})/g];print$a
why do you need the [] ?
OK, I understand it now. The [] provides the list context
to force iteration of the whole string. For example:
$x = 'abc';
@a=$x=~/.(?{print$})/g;
$x
The latest version of Acme::EyeDrops:
http://search.cpan.org/search?dist=Acme-EyeDrops
contains five face shapes, namely:
larry, damian, merlyn, eugene, buffy2.
A friend of mine asked: Is it possible to produce a 'pure'
(i.e. no leading eval) EyeDrop'ed program that displays
one of these faces
On Sat, 2 Mar 2002, Yanick wrote:
Ah, the things one is ready to do to keep his mind away from
a big fat score of 65 that doesn't seem to want to shrink of a
single stroke
Stephen Turner schreef op 3 marchi 2002:
If only there were a POSIX::secretnumber()
I checked that too; we
[EMAIL PROTECTED] wrote:
Unfortunately, I have been reduced to hanging on to Keith and
Stephen like a leech. :-(
Keith C. Ivey schreef op 4 Marchi 2002:
Looks like the leech has detached itself. You've shot up to
second place, 5 strokes ahead of me. I don't seem to be
getting the
/-\ndrew schreef op 04 maart 2002:
After seeing the leaderboard this morning, I started hearing
the Jaws theme playing in my head It won't go away, has been
playing all morning Oh, the shock and terror of seeing Eugene
and Karsten swimming in the water right behind me!
/-\ndrew
Rick
Rick Klement schreef op 05 maart 2002:
I hate to break it to you, Andrew, but others consider *you*
to be one of the sharks
/-\ndrew schreef op 05 maart 2002:
When I went to submit it, I noticed Ton Hospel is on 52
Well done, Ton!
Well done, shark Rick too! I see you got to 52
Since Rick is
Dave Hoover schreef op 08 maart 2002:
But the honor must go to Ton for his herculean 47.53, beating
BoB and 132 other golfers. Congrats Ton! Honorable mention also
goes to Lars Mathiesen for winning the Beginner's category.
I would also like to congratulate Ton and Lars, and pay tribute
to
Stephen Turner schreef op 09 maart 2002:
Thanks for all the replies about the history of Perl golf.
One more question: when is the earliest example of a proper
organised competition, rather than just a challenge on a mailing
list or whatever? Are there any before the recent five?
The
En op 08 maart 2002 sprak Eugene van der Pijll:
Of course, some people can do a golf thread all by themselves
in one post:
http://groups.google.com/groups?selm=1991Apr29.072206.5621%40jpl-devvax.jpl.
nasa.gov
En op 04 maart 2002 sprak /-\ndrew:
Oh, the shock and terror of seeing Eugene and
1 - 100 of 148 matches
Mail list logo