(my $session, $error) = Net::SNMP->session(
		-version     => $snmp_version,
		-hostname    => $host,
		-community   => $community,
		-port        => $port
	);

	if (!defined($session)) {
		print "[" . &logger_time . "] ERROR: $error.\n";
		$error=1;
	}

	my $result = $session->get_table(
		-baseoid          => $OID_tree,
	);
	if (!defined($result)) {
		print "[" . &logger_time . "] ERROR: $host $OID_tree " .$session->error. "\n";
		$session->close;
		$error=1;
	}

##</code><code>##

# snmpwalk -v2c -c public 82.179.195.37 .1.3.6.1.2.1.2.2.1.22.1
interfaces.ifTable.ifEntry.ifSpecific.1 = OID: .ccitt