use SNMP;
use Data::Dumper;

$ENV{'MIBS'}="ALL";

my $uptime = 'sysUpTime.0';
my $memsize = 'memTotalReal.0';
my $memfree = 'memTotalFree.0';

my $VLIST = new SNMP::VarList( [$auptime],[$memsize],[$memfree] );

# Sets up %hostkeys and creates/connects all the SNMP sessions
&confparse();

my @result = $hostkeys{$host}{session}->get( $VLIST );
print Dumper(@result);