--On Thursday, March 10, 2005 3:58 PM +0100 Marko Riedel <[EMAIL PROTECTED]> wrote:
} else { open DEBUG, '>>/tmp/dbg'; print DEBUG $trapbuf . "FROM: <$from>\n"; close DEBUG;
handle_trap ($trapbuf, $from); } next;
It turns out that "recv" returns a nonsensical value. The debug output is as follows (excerpt):
$from isn't a simple string, you need to do something like: my ($port, $addr) = sockaddr_in ($from); my $fromip = inet_ntoa ($addr);
-David
David Nolan <*> [EMAIL PROTECTED]
curses: May you be forced to grep the termcap of an unclean yacc while
a herd of rogue emacs fsck your troff and vgrind your pathalias!_______________________________________________ mon mailing list mon@linux.kernel.org http://linux.kernel.org/mailman/listinfo/mon
