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