!news
on *:sockread:news: {
if !$sockerr {
tokenize 32 $sock(news).mark
var %news, %y /<[^>]+>/g
sockread %news | if $regex(%news,/(.+)<hr />/) {
[ [ $1-3 ] ] | sockclose $sockname
}
}
else { $1-2 ERROR! }
}
on *:sockopen:news: {
if $sockerr {
$token($sock($sockname).mark,1-2,32) ERROR!
}
else {
var %x sockwrite -nt $sockname
%x GET /feed.php HTTP/1.0
%x Host: $+($sock(news).addr,$str($crlf,2))
}
}
on $*:text:/^!news$/iS:#:{
if !%t { inc -u3 %t
$iif($sock(news), sockclose $v1)
sockopen news www.isoleet.com 80
msg # 7 This is the most recent post on www.IsoLeet.com
sockmark news msg # $!replace($regsubex($regml(1)$&
$+ ,%y,),",",Statistics:,$chr(32))
}
}
lol Calm down, you surely are a tough cookie. :P Perhaps I sounded a bit straightforward, saying you submitted this as you own. I meant no harm but to pinpoint that this was a forum request. Generally I wouldn't mind whether it was altered, ripped or whatnot. I'm glad that it's served its purpose of making a user's life easier without checking the actual website. :-)
Actually I modified and rewrote that socket script for Gemster at the forum request. He probably shared it with you and you've submitted it as your own snippet.
You can find the script here at:
http://www.hawkee.com/phpBB2/viewtopic.php?t=22388
And read the thread toward the end.