my $mailbox = Win32::OLE->GetObject("LDAP://EXCHSERVER/o=org/ou=orgunit/cn=Recipients/cn=userDN");
$mailbox->{cn} = "Smith, Jane";