if ($snmp_priv_passphrase ne "") { $snmp_priv_passphrase = undef; }
my ( $session, $error ) = Net::SNMP->session(
    ...
}