on *:JOIN:#:{ 
  set %whois $chan 
  whois $nick 
} 
raw 319:*:{ 
  if (%whois) { 
    msg %whois 4 $2 12is on: $3- 
    unset %whois 
  } 
}