bind pub -|- * echo:yingyang

set srcchan "#pre.test1"
set destchan "#pre.test2"
set mustbe "P.R.E"

proc echo:yingyang {nick uhost handle chan args} {
global srcchan destchan mustbe
if { $chan == $srcchan } {
set yypre [lindex $args 1]
if { $yypre == $mustbe } {
set group [lindex $args 4]
set release [lindex $args 7]
set section [lindex $args 9]
putquick "PRIVMSG $destchan : $group $release $section"
}
}
}