Is there a reason you want to use perl to do this? At least on linux, I just use curl:

/usr/bin/curl -T yourfile ftp://your.destination -u name:password
[download]