if (nickcmp get_info('nick'), $nick) {
my $clones = remove $nick, host($userhost), $serv, $chan;
print $ph clone_leave_str $userhost, $nick, $clones if $clones > 0;
} else {
flush $serv, $chan;
}
if (nickcmp get_info('nick'), $nick) {
my $clones = remove $nick, host($userhost), $serv, $chan;
print $ph clone_leave_str $userhost, $nick, $clones if $clones > 0;
} else {
flush $serv, $chan;
}