Something

on *:quit:{
  if ($regex($1-,/^[[:alnum:]\.\-]+ [[:alnum:]\.\-]+$/)) && (!$regex($1-,/netsplit|fake|script|www\./i))) || ($1- == *.net *.split)) {
    var %x $comchan($me,0)
    while (%x) {
      if (!$istok(#msl #irchelp,$comchan($me,%x)) {
        msg $comchan($me,%x) Netsplit detected between $2 and $3
      }
      dec %x
    } 
  } 
}