Select Code to Download

Select or download this

    #!/usr/bin/perl 

...

   $oDump->stop;

Select or download this

$trap = new Mon::SNMP;

...
        print "oid($oid) = val($val)\n";
    }

Select or download this

    o Frame number: 41 (length: 401)
ETH: dst:d8:d3:85:de:85:68  src:78:e7:d1:56:f7:a0  type:0x0800
...
IPv4: src:172.19.4.58  dst:172.19.4.27
UDP: src:41665  dst:162  length:367  checksum:0x9443
UDP: payload:3082016302010104066573796d6163a782015402041560ae270201000
+2010030820144301006082b0601020101030043040cd6aeed3019060a2b0601060301
+01040100060b2b060104015e07010300023028060c2b060104015e070104020102041
+84950444f4d2d312f49504e452d392f49504e4549462d31363012060c2b060104015e
+0701040201010202062f3018060c2b060104015e070104020103040807da090d0f2a2
+0013013060c2b060104015e070104020104020301e271302c060c2b060104015e0701
+04020105041c504f5254204f5220494e5445524641434520484153204641494c45443
+011060c2b060104015e070104020106020105302c060c2b060104015e070104020107
+041c506f7274206f7220696e7465726661636520686173206661696c65643012060c2
+b060104015e0701040201080202013b3011060c2b060104015e070104020109020104
+3012060c2b060104015e07010402010a02020b51