Awesome. thank you.
i changed one thing:
putquick "PRIVMSG $chan :\00304(\00315PRE\00304)\00315 $stamp \00304(\00315$section\00304)\00315 $release"
to
putquick "PRIVMSG $nick :\00304(\00315PRE\00304)\00315 $stamp \00304(\00315$section\00304)\00315 $release"
so it send the search results as a message. please correct me if this is very wrong/stupid, as i have not done any tcl/irc coding.