Well I noticed that the put() is the only data command that you are doing, so we can't know that you aren't getting into firewall problems. Try doing a dir() call before the put and see if you die on that one first.

In any case, while you presumably have tested using your command line FTP client and that worked, you might not be using the same active/passive mode in this program. Try adding -Passive=>1 to the options to new()?