Tor Hildrum said: > I found this on the perl-beginner list: > Perl -e > '*,=sub{print+local$*=$*.$_[$_],$/,&,(@_[1+$_..$#_])for$#..$#_};&,(1..5)' > > By Paul Johnson, which isn't to shabby, but not really up to specs.
At first I thought "What? I posted that to the _beginners_ list?", but then I remembered (or at least I remembered doing it, and google reminded me why I did it). Some chap had basically posted a homework question. I posted a fairly reasonable reply, but someone else posted some code, so I asked him to hand that one in for me too. I wasn't necessarily after brevity or obfuscation, more fun I suppose. I considered posting something to fwp or here, but I suppose I never got round to it. The "spec" for that one was at http:[EMAIL PROTECTED]/msg34931.html My posting was http:[EMAIL PROTECTED]/msg34944.html -- Paul Johnson - [EMAIL PROTECTED] http://www.pjcj.net