on *:DNS:{
VAR %search.string.ip = *!*@ $+ $iaddress
VAR %search.string.named = *!*@* $+ $naddress
IF ($ial(%search.string.ip,0) > 0) {
VAR %t = $ial(%search.string.ip,0)
WHILE (%t > 0) {
VAR %list.ip = $addtok(%list.ip,$ial(%search.string.ip,%t).nick,32)
DEC %t
}
}
IF ($ial(%search.string.named,0) > 0) {
VAR %t = $ial(%search.string.named,0)
WHILE (%t > 0) {
VAR %list.named = $addtok(%list.named,$ial(%search.string.named,%t).nick,32)
DEC %t
}
}
IF (%list.ip) { echo 2 -a *** Matches for $iaddress $+ : %list.ip }
IF (%list.named) { echo 2 -a *** Matches for $naddress $+ : %list.named }