Select Code to Download

$VAR1 = {
          'len' => 74,
...
        Net::RawIP::bset('Net::RawIP=HASH(0x814ec28)', '\x{0}#\x{4}\x{
+ae}w;\x{0}!\x{e1}\x{fc}\x{9f}\x{f1}\x{8}\x{0}E\x{0}\x{0}<\x{7}\x{b2}\
+x{0}\x{0}@\x{11}\x{ff}j\x{14}\x{1}P\x{1b}\x{a}\x{80}\x{4}\x{f9}\x{14}
+P\x{14}Z\x{0}(\x{d1}0\x{80}\x{12}\x{93}Hk\x{bd}9\x{e5}\x{9}\x{9f}r[\x
+{e0}\x{e7}\x{da}\x{5}\x{cc}\x{ab}\x{11}...', 'eth0') called at readpc
+ap.pl line 48
        main::handlepacket('Testing', 'HASH(0x840a63c)', '\x{0}#\x{4}\
+x{ae}w;\x{0}!\x{e1}\x{fc}\x{9f}\x{f1}\x{8}\x{0}E\x{0}\x{0}<\x{7}\x{b2
+}\x{0}\x{0}@\x{11}\x{ff}j\x{14}\x{1}P\x{1b}\x{a}\x{80}\x{4}\x{f9}\x{1
+4}P\x{14}Z\x{0}(\x{d1}0\x{80}\x{12}\x{93}Hk\x{bd}9\x{e5}\x{9}\x{9f}r[
+\x{e0}\x{e7}\x{da}\x{5}\x{cc}\x{ab}\x{11}...') called at readpcap.pl 
+line 33

$VAR1 = {
          'len' => 60,
...
 at /usr/lib/perl5/Net/RawIP.pm line 550
                Net::RawIP::send('Net::RawIP=HASH(0x814ec28)') called 
+at readpcap.pl line 52
                main::handlepacket('Testing', 'HASH(0x8410004)', '\x{1
+}\x{80}\x{c2}\x{0}\x{0}\x{e}\x{0}\x{14}\x{e}>\x{f0}\x{0}\x{88}\x{cc}\
+x{2}\x{7}\x{4}\x{0}\x{14}\x{e}>\x{f0}\x{1}\x{4}\x{7}\x{3}\x{0}\x{14}\
+x{e}>\x{f0}\x{b}\x{6}\x{2}\x{0}x\x{0}\x{0}\x{0}\x{0}\x{0}\x{0}\x{0}\x
+{0}\x{0}\x{0}\x{0}\x{0}\x{0}\x{0}\x{0}\x{0}\x{0}\x{0}\x{0}\x{0}\x{0}\
+x{0}\x{0}\x{0}') called at readpcap.pl line 35