Help for this page
$search = $ldap->search(base=>"samaccountname=>$user,cn=>U +sers,dc=>us,dc=>megatrends,dc= +com",filter=>"(objectClass=memberOf)");
use strict; use Net::LDAP; ... } $ldap->unbind;