#!/usr/bin/perl

$host=shift;
$community=shift;

$data=`snmpwalk $host $community .1.3.6.1.2.1.25.3.3.1.2`;
#$data=$datas[0];

($index,$value)=split(/=/, $data);
$value=int($value * 1);
print "$value\n";
print "$value\n";
print "\n";
print "\n";
