Yes, that is true, there are blank lines in the logs. I added your next statement and it worked like a champ.

By the way, I really admire that line: ($dst, $service) = (split /;/)[11, 12];

Thanks, but I can't take credit for it. It was suggested by a most excellent monk, Juerd, in this post Another Array Problem: comparing..

-Dru
Another satisfied monk