Here's some untested code employing Net::LDAP which may be of some use to you ...

sub DN          ()  { 'cn=admin,dc=domain,dc=com' }
sub PASSWORD    ()  { 'password' }
sub SERVER      ()  { 'localhost' }

use Carp;
use Net::LDAP;

#   Create connection to the LDAP server and bind authoratively using
#   administrator credentials

my $ldap = Net::LDAP->new( SERVER );
unless ( defined $ldap )
{
    croak( 'Cannot create connection to LDAP server -- ', $! );
}
$ldap->bind
(
    'dn'        =>  DN,
    'password'  =>  PASSWORD
);

my $result = $ldap->add
( 
    'cn=domain,ou=v_domains,ou=postfix,ou=system_services,dc=domain,dc
+=com',
    'attr'  =>  
    [
        'cn'                    =>  'domain',
        'objectClass'           =>  'inetLocalMailRecipient',
        'mailLocalAddress'      =>  'username@domain, domain',
        'mailRoutingAddress'    =>  'alias'
    ]
);
if ( $result->code )
{
    carp( 'Error in adding LDAP entry -- ', $result->error );
}

$ldap->unbind;
[download]

Some links which may be of help to you include:

• the documentation for Net::LDAP,
• this article on searching on LDAP servers from Perlmonth and
• this LDAP tutorial from SAGE-AU.

 

perl -le 'print+unpack"N",pack"B32","00000000000000000000001001110100"'

---

---

Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!

Titles consisting of a single word are discouraged, and in most cases are disallowed outright.

Read Where should I post X? if you're not absolutely sure you're posting in the right place.

Please read these before you post! —

• How do I compose an effective node title?
• How do I post a question effectively?
• Markup in the Monastery

Posts may use any of the Perl Monks Approved HTML tags:

a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr

You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)

	For:		Use:
	&		&
	<		&lt;
	>		&gt;
	[		&#91;
	]		&#93;

Link using PerlMonks shortcuts! What shortcuts can I use for linking?

See Writeup Formatting Tips and other pages linked from there for more info.