Can't locate object method "new" via package

[Radhakrishnan, Rajagopal]

Hello,
I'm using  Net::LDAP to search and add ldap entry. the search works fine,
but "add" gives below error. any help appreciated. Thanks. -Raj
 
 
compile:
========
perl -Ic:/perl/lib/Convert-ASN1-0.17/lib/ -Ic:/perl/lib/perl-ldap-0.29/lib/
add_ldap_org.pl
 
error: 
=====
Can't locate object method "new" via package "Net::LDAP::Add" (perhaps you
forgo
t to load "Net::LDAP::Add"?) at c:/perl/lib/perl-ldap-0.29/lib//Net/LDAP.pm
line
 227, <DATA> line 185.
 
code:
=====
 
#!/usr/bin/perl
use Net::LDAP;
#use Net::LDAP qw(:all);                      # use for all code
  $directoryURL       = "ecat1.xxx11.com";
 
  $ldap = Net::LDAP->new($directoryURL) # as struct
       or die "$@";
 
my $DNbranch = "ou=bailiwick, o=mycompany, c=mycountry";
 
my $CreateArray = [
             objectClass => ["top","person","organizationalPerson"],
                      cn => "Jane User",
                     uid => "0000001",
                      sn => "User",
                    mail => " [EMAIL PROTECTED]
<mailto:[EMAIL PROTECTED]> "
                ];
my $NewDN =  "@$CreateArray[2]=".
                  "@$CreateArray[3]+".
                  "@$CreateArray[4]=".
                  "@$CreateArray[5],".
                  $DNbranch;
LDAPentryCreate($ldap,$NewDN,$CreateArray);
 

sub LDAPentryCreate
{
     my ($ldap,$dn,$whatToCreate) = @_ ;
     my $result = $ldap->add( $dn, attrs => [  @$whatToCreate ] );
     return ($result );
}


Thanks, 
Raj Radhakrishnan 
Systems Analyst 
717-810-2830 
mailto:[EMAIL PROTECTED] <mailto:[EMAIL PROTECTED]>