Ahem ...

my %hash = { $_ => (\&{$_})->() } qw(
  INTEGER INTEGER32 OCTET_STRING OBJECT_IDENTIFIER
  IPADDRESS COUNTER COUNTER32 GAUGE GAUGE32 UNSIGNED32
  TIMETICKS OPAQUE COUNTER64
);
[download]

So now you'll have a hash where the keys points to their corresponding constant values.
HTH

_________
broquaint