You can also do it like so:

on *:open:?:*:{
  while $comchan($nick,$0) { tokenize 32 $1- $v1 } 
  echo $nick Query from $nick $+ . Full address: $fulladdress $+ . Common channels: $2-.
}