parse_tcpdump_log.pl: Add an option to enable debug

Signed-off-by: Mauro Carvalho Chehab <mchehab@redhat.com>

diff --git a/contrib/parse_tcpdump_log.pl b/contrib/parse_tcpdump_log.pl
old mode 100644 (file)
new mode 100755 (executable)
index 56882c1..6ddacaf
--- a/contrib/parse_tcpdump_log.pl
+++ b/contrib/parse_tcpdump_log.pl
@@ -2,13 +2,14 @@
 # using cpan, you should install Net::TcpDumpLog
 use Net::TcpDumpLog;
 use strict;
-
+use Getopt::Long;
 
 # Currently, accepts only one usbmon format:
 #      USB with padded Linux header (LINKTYPE_USB_LINUX_MMAPPED)
 # This is the one produced by Beagleboard sniffer GSOC.
 
 my $debug = 0;
+GetOptions('debug' => \$debug);
 
 # Frame format as parsed by libpcap 1.0.0 and 1.1.1. Not sure if format
 # changed on different versions.