I work with one of the largest AD structures in the world, and I've yet to run into very much that I can't do directly in perl. For example, to move John Doe from Marketing into Sales, you could try something like this:

my $oContainer = Win32::OLE->GetObject("LDAP://OU=Sales, DC=Company, D
+C=COM");
my $oUser = $oContainer->MoveHere("LDAP://CN=John Doe, OU=Marketing, D
+C=Company, DC=COM");
$oUser->SetInfo();
[download]