$path='cn=username,ou=mybase_ou,dc=computer,dc=com';
if (my $objUser = Win32::OLE->GetObject("LDAP://" . $path)){
}