Moving computers within different OU's

[Guess_Who344]

Hello,   New to Perl/AD programming.  Does anyone have a script (or more information) on moving computer from the default 'Computers' container into different OU's?   Also - any links/resources for Perl/ADSI would be helpful!    Thanks in advance,   Ron