Jonathan E. Paton ([EMAIL PROTECTED]) wrote:
> > further shaving, though it's all lowercase.
> > perldoc perlfaq1: What is a JAPH?
> >
> > print`perldoc -qj`=~/"(j.*)"/
> 
> print`perldoc -qj`=~/(j.*)"/

print`$^Xdoc -qj`=~/(j.*)"/

where ^X is a raw ^X, of course.  Could this be the first golf I've
ever won?  Pah, as if!  Come on aliens, do your worst :-)

Mind you, perldoc is an external program, so this whole approach goes
against the rules, otherwise you could just do

  print`japh`

where japh is the appropriate executable.

Reply via email to