Re: World's shortest JAPH (was: first)

[Sven Neuhaus]

On Wed, Aug 22, 2001 at 10:56:49AM -0400, John Porter wrote:
> Sven Neuhaus wrote:
> > eval`nc a.tm 9000`
> 
> He really ought to see about getting that service running
> at a port in the range 1..9.

OK, I give in.

eval`nc a.tm 8`
-- 
$\=$/,$^X=~m(((.)..l));$~=q,od,,$_='[EMAIL PROTECTED] 2000/01/04'
,$;="/$2$~/$1f\141q".(close STDERR).".$2$~";$#=length,print
map{@ARGV=-f$_.$;?$_.$;:m;();;m>"(j.{$#})>while<>;$+}@INC