in imdb.tcl exchange
if {[set matches [regexp -nocase -all -inline {<a href="/Sections/Genres/.+?/">(.+?)</a>} $data]] != ""} {
to:
if {[set matches [regexp -nocase -all -inline {<a href="/Sections/Genres/.+?/">([A-Za-z0-9]+)</a>} $data]] != ""} {
__________________
ioNiNJA
|