in reply to Re: (Golf) Patriotic Golf
in thread (Golf) Patriotic Golf

Ha, you better hope no one actually creates a node named 112874, like someone did with 847 (opposed to node_id=847)... Anyway, I chopped three chars off it like this. 
use LWP::Simple;print+(get"http://3467251276/?node=112874")=~/(\*.*?)<
+/s

[download]

-Blake

Replies are listed 'Best First'.
Re: Re: Re: (Golf) Patriotic Golf
by japhy (Canon) on Sep 24, 2001 at 01:29 UTC
    If LWP::Simple is installed, GET should be too, so I make it in 51 chars. Oh, and I print to STDERR instead. 
    die+(`GET "3467251276/?node=112874"`)=~/(\*.*?)</s

    [download]

    _____________________________________________________
    Jeff[japhy]Pinyan: Perl, regex, and perl hacker.
    s++=END;++y(;-P)}y js++=;shajsj<++y(p-q)}?print:??;

[reply]
[d/l]

In Section Meditations