Easy quick tcl script update

just need a quick update done on a tcl script script was written to work with this -=[PRE]=- -=[TV]=- -=[ CSI S07E22 HDTV XViD Caph ]=- we need it to work with [PRE] ¤ [TV-DVDRiP] ¤ Mimi E La Nazionale Di Pallavolo E101 iTALiAN DVDRip XviD BBZ script responds to the word PRE and enters the details into the db (section) and (release name) plus (TIME) if {[string match "*PRE*=*=*" $arg]} { set rlstitle [split $arg "="] set rlstitle [lindex $rlstitle 5] set rlstitle [string range $rlstitle 1 end] set cutfrom [expr [string length $rlstitle] -2] set rlstitle [string range $rlstitle 0 $cutfrom] but because of the different announce format it's no longer working. should be an easy fix (2 lines) ## Deliverables 1) Complete and fully-functional working program(s) in executable form as well as complete source code of all work done. 2) Deliverables must be in ready-to-run condition, as follows (depending on the nature of the deliverables): a) For web sites or other server-side deliverables intended to only ever exist in one place in the Buyer's environment--Deliverables must be installed by the Seller in ready-to-run condition in the Buyer's environment. b) For all others including desktop software or software the buyer intends to distribute: A software installation package that will install the software in ready-to-run condition on the platform(s) specified in this bid request. 3) All deliverables will be considered "work made for hire" under U.S. Copyright law. Buyer will receive exclusive and complete copyrights to all work purchased. (No GPL, GNU, 3rd party components, etc. unless all copyright ramifications are explained AND AGREED TO by the buyer on the site per the coder's Seller Legal Agreement). ## Platform linux tcl8.1 eggdrop