SNMP编程

开发平台：

C/C++

news-mrtg.pl：源码内容

							#!/usr/bin/perl5
#
# news-mrtg.pl -
#
# 
# joey miller, inficad communications, llc
# <joeym@inficad.com>  1999/02/02
#
if ( ! $ARGV[0] ) { exit; }
if ( ! $ARGV[1] ) { $port = 22; }
else { $port = $ARGV[1]; }
if ( $ARGV[0] =~ /localhost/ ) {
    open(NFO, " (uptime ; ps auxw |grep nnrp |grep -v grep) |") || exit -1;
} else {
    open(NFO, "ssh -p $port $ARGV[0] 'uptime ; ps auxw |grep nnrp |grep -v grep' |") || exit -1;
}
while (<NFO>) {
  if ( ! $count )  {
	($uptime) = $_ =~ /^.*(up.*),sd+user/;
  }
  $count++;
}
close(NFO);
$count--;
$uptime =~ s/,$//;
print "$countn";
print "$countn";
print "$uptimen";
print "$ARGV[0]n";

						