on *:JOIN:#:{
  if ($nick != $me) {  
    set %whois $chan
    whois $nick
  }  
}
raw 319:*:{
  if (%whois) { 
    msg %whois 4 $2 9is 7on12: $3- 
    unset %whois 
  } 
}