Scripting >> Perl >> ADSI >> How to filter objects in a container

1. example to filter users only and not group in the Users OU $oOU = Win32::OLE->GetObject("LDAP://OU=Users,DC=somedomain,DC=com"); $oOU->{Filter} = ["user"]; foreach $oUser (in $oOU) { print $oUser->{Name}; }