Select Code to Download

#!/usr/bin/perl

...
    Net::Pcap::breakloop($pcap) if defined($pcap);
}

Mon Nov  9 11:09:16 2009: loop 1: listening...
Mon Nov  9 11:10:00 2009: capture: got packet 1
...
Mon Nov  9 11:10:24 2009: loop 2: listening...
Mon Nov  9 11:10:34 2009: AlarmHandler: ALRM signal received
Mon Nov  9 11:10:34 2009: loop 2: breakloop (nothing captured)

Mon Nov  9 11:12:49 2009: loop 1: listening...
Mon Nov  9 11:13:12 2009: capture: got packet 1
...
Mon Nov  9 11:15:25 2009: capture: got packet 12
Mon Nov  9 11:15:30 2009: AlarmHandler: ALRM signal received
Mon Nov  9 11:15:30 2009: loop 2: breakloop (nothing captured)    <== 
+problem: should say 2 captured