my $bah = "INTEGER";
snmpset("1.3.6.1.4.1.9.9.68.1.2.2.1.2.22","1.1.1.1","mystring",&$bah,1);

##</code><code>##

my $bah = INTEGER;
snmpset("1.3.6.1.4.1.9.9.68.1.2.2.1.2.22","1.1.1.1","mystring",$bah,1);

##</code><code>##

my $bah = \&INTEGER;
snmpset("1.3.6.1.4.1.9.9.68.1.2.2.1.2.22","1.1.1.1","mystring",&$bah,1);