SNMP编程

开发平台：

C/C++

ovsysnms：源码内容

							#!/usr/local/bin/perl5
# -*- mode: Perl -*-
##################################################################
# Config file creator
##################################################################
# Created by Laurie Gellatly <gellatly@one.net.au>
# this produces an array of ip address and system names for each
# ip address passed to it, by pulling info
# off the device via snmp
#################################################################
#
# Distributed under the GNU copyleft
#
# $Id: ovsysnms,v 1.1.1.1 2002/02/26 10:16:36 oetiker Exp $
#
use Socket;
use strict;
use ovmrtg;
use vars '$DEBUG';
my $DEBUG = 0;
my($router,@res,$cnt); 
sub main {
  $router = $ARGV[0];
  die <<USAGE  unless $router;
USAGE: ovsysnms 'router IP ADDRESS/S or HPOV selection Names'
EXAMPLE:  ovsysnms 193.21.1.2 >> resolved
USAGE
   @res = ovsysnms(@ARGV);
   for($cnt = 0 ; $cnt < @res; ++$cnt){
      print "$res[$cnt]n";
   }
}  
main;
exit(0);

						