Re^3: PERL en ADSI

Yep.

Add

use strict;
use warnings;
[download]

To the top of that code, and Perl will tell you what is technically wrong and help get the code to run.

You will save yourself from a million headaches if you use those liberally.

(Appended)
PS:
A quick look through the Win32::OLE description indicates that your code probably won't compile because "in" isn't exported by default. You probably want to add that and anything else you want to use to your use statements up top.

Comment on Re^3: PERL en ADSI Select or Download Code

Replies are listed 'Best First'.
Re^4: PERL en ADSI by PerlUserNL (Initiate) on Jan 11, 2011 at 14:37 UTC
`use strict; use warnings; use Win32::OLE; $ou=Win32::OLE->GetObject("LDAP://ou=Users,dc=myDomain,dc=net"); @filter=("user"); $ou->{filter}=\@filter; foreach $obj (in $ou){ print "$obj->{name}\n"; }` [download] I add the strict en warnings by default in my scripts, But i forgot to posted it here...	[reply] [d/l]
Re^5: PERL en ADSI by Sinistral (Monsignor) on Jan 11, 2011 at 15:46 UTC
corion is correct, this code won't work at all. Perhaps you want to look at a working LDAP / Active Directory example: Help using Win32::OLE	[reply]
Re^5: PERL en ADSI by Corion (Patriarch) on Jan 11, 2011 at 14:46 UTC
This code cannot compile. Please show some effort and eliminate the most obvious errors before posting.	[reply]