http://qs1969.pair.com?node_id=207850

Not especially obfuscated, per se, but I think you may enjoy it.
perl -MLWP::UserAgent -e '$u=new LWP::UserAgent;$u->agent("japh"); print join(" ",(split(/\s+/,(split/\n/,$u->request(HTTP::Request-> new(GET=>join("",split(/\n/,"http://groups.google.com/groups?selm= 4365%40omepd.UUCP&output=gplain"))))->content)[60]))[0..3]),",\n"'
--Kevin