If you're happy with rsync then File::Rsync as suggested above is definitely worth a try. You could check the rsync resources. There are a few Perl scripts available there including the Perl wrapper mentioned above.

Maybe this is also a direction to look into: ftpsync. It acts as a primitive rsync clone. There are many solutions like this around.

Hope this helps