proc chanchecker {chan} {if {![string match "*+idlestats*" [channel info $chan]]} {return}}

proc top10 {nick uhand hand chan input} {
  global irpg
set chan "$chan"
  set token [::http::geturl $irpg(url)/$irpg(players)]
  set lines 5
chanchecker "$chan"
    #if {[lsearch -exact [channel info $chan] "+idlestats"] == -1} {return}
    regexp -all -- {<ol>(.+?)</ol>} [::http::data $token] x players
    ::http::cleanup $token
    foreach line [lrange [split $players \n] 6 10] {
      set out [unhtml $line]
      incr lines
      nowbitch "PRIVMSG $chan :7$lines.  $out"
    }
}
# Snyper