my @oids = ( '.1.3.6.1.2.1.4.20.1.2' );
my $req = $snmp->get_next_request(
  -varbindlist => \@oids,
);
$snmp->close;
while (my ($key,$value) = each %{$req}) {
  print "$key = $value\n";
}