perl-dap using cygwin perl 5.6.1

[Tony A. <ton...@ma...>]

I've used the perl-ldap module with version 5.6.0 of Perl by Activestate on
Windows 2000 and am now trying it with Perl 5.6.1 under cygwin 1.1.8, but
with not much success. A simple script to search for an attribute on our
ldap server fails with an I/O error as follows:

I/O Error Resource temporarily unavailable
494f3a3a536f636b65743a3a494e45543d474
c4f422830786130323232386329 at ./find.pl line 14, <STDIN> line 1.

The script is as follows:

#!/usr/bin/perl

use Net::LDAP;

$ldap = Net::LDAP->new('ldap.mcc.ac.uk') or die "$@";

$ldap->bind or die "$@";

print("\nGetting username ...\n\n");
print("Username: ");chop ($user=<STDIN>);

print("Searching LDAP for username ...\n");
$mesg = $ldap->search(base=>"c=UK",filter=>"(uid=$user)");
$mesg->code && die $mesg->error;

$y = $mesg->count();
printf "$y entries found.\n";

foreach $entry ($mesg->all_entries) {
  $dn=$entry->dn();
  @mail=$entry->get('mail');
  print("Distinguished name: $dn\nMail address: $mail[0]\n");
}

Anyone with any similar experiences of doing this? All help very much
appreciated.

Regards,
Tony.
--
Tony Arnold, Deputy Head of COS Division,
Manchester Computing, University of Manchester.
Tel: +44 161 275 6093, Fax: +44 870 136 1004, Mob: 0773 330 0039
E-mail: ton...@ma..., Home: http://www.man.ac.uk/Tony.Arnold