I haven't tried it, but there is an article on Linux Journal with a perl script called ftpsync, which may save you an hour or two.