Adam Spiers wrote:
> 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.
even better:
% cat > /usr/bin/perl
#!/bin/sh
echo "Just another Perl hacker,"
EOF
Then you get a ZERO byte solution:
% touch japh.pl
% /usr/bin/perl japh.pl
Just another Perl hacker,
% wc japh.pl
0 0 0 japh.pl
Reductio Ad Absurdum
[hris