The documentation for Net::FTP discusses local and remote files in the Overview and shows the two-argument form of put() in Methods.

You could also change the local directory beforehand and then proceed as you are currently doing (bearing in mind the caveats posted by Illuminatus).

If you have further problems, please reinstate the error checking and add use strict; and use warnings; to your code.