I commend you for including the code, but what's the problem you're having with counting the packets? Don't just tell us you have a problem with it, tell us what the problem is. I don't mind reading the code looking for an issue, but without knowing exactly what the problem is, I don't know what sorts of errors to look for.
Having said that, I read the code anyway. When I looked for counters, the only thing I found is:
my $count = 0; Net::Pcap::loop($object, -1, \&syn_packets, '$count++') || die 'Unable to perform packet capture'; print "$count";
I don't have Net::Pcap installed on my machine, so I'm not trying out your program, but seeing '$count++' looks like an obvious problem. First, since it's in single quotes, the $count variable won't be interpolated. Second, since it's a function call argument, and the function call isn't in a loop, it will be evaluated only once. Third, the documentation mentions that the argument is simply a chunk data to pass to the callback, not a code reference to execute. I suggest adding $count++ to your callback function and eliminating the '$count++' argument.
...roboticus
When your only tool is a hammer, all problems look like your thumb.
In reply to Re: counting syn+ack. Help!!!
by roboticus
in thread counting syn+ack. Help!!!
by Arijit
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |