#!/usr/bin/perl -w

use SNMP;
use Data::Dumper;

my $session = new SNMP::Session(DestHost => 'xxx', Community => 'xxx', Version => '2');

print Dumper ($session->gettable('ifTable',noindexes=>1));