Hi all,

I wrote a patch to ease the creation of entries. Once applied, this code

sub create {
    my $dn = shift;

    my $e = new Net::LDAP::Entry ; 
    $e->dn( $dn );
    $e->add( objectClass => [EMAIL PROTECTED] );

    return $e;
}

can be written like this :

sub create {
    my $dn = shift;

    return Net::LDAP::Entry
    -> new ( $dn )
    -> add ( objectClass => [EMAIL PROTECTED] )
}

I hope some of you will enjoy the idea.

Regards,
mc

-- 
téléphone : 03.90.24.00.19
courriel  : [EMAIL PROTECTED]
---------------------------------------
28c28,29
<   $entry;
---
>   @_ and $entry->dn( shift ); 
>   return $entry;
166a168,169
> 
>   return $self;

Reply via email to