Net::ftpssl put command doesn't work?

Mikeal has asked for the wisdom of the Perl Monks concerning the following question:

The put command reports that it completes properly, but the file does not exist on the ftp server.

>>> STOR grrr.txt
<<< 150 Ready to write file "grrr.txt".
<<< 226 Transfer complete.
[download]

I can change directories and get files without issue. I've tried multiple versions of Net::ftpssl. The FTP I have to send to only supports ftps/TLS. =/ Any input would be greatly appreciated.

use Net::FTPSSL;
$ftps = Net::FTPSSL -> new('yyy.yyy.yyy.yyy',
                Encryption => 'I',
                Debug => '2',
                DebugLogFile => 'ftps.log');
$ftps -> login("luser","pass");
$ftps -> cwd("/TEST/Test/");
$ftps -> put("TEST.TXT","grrr.txt");
$ftps -> quit;
[download]

Comment on Net::ftpssl put command doesn't work? Select or Download Code

Replies are listed 'Best First'.
Re: Net::ftpssl put command doesn't work? by Illuminatus (Curate) on Aug 28, 2009 at 21:36 UTC
I assume you verified that the cwd() call was successful? You could add `Croak => "f"` to the new() call, which might provide more insight... fnord	[reply] [d/l]
Re: Net::ftpssl put command doesn't work? by bichonfrise74 (Vicar) on Aug 28, 2009 at 17:03 UTC
Have you tried to manually 'put' the file in the server and is it really there?	[reply]
Re^2: Net::ftpssl put command doesn't work? by Mikeal (Initiate) on Aug 28, 2009 at 18:26 UTC
I can put the file on the server using other ftp problems. Shows the same commands in the ftp log.	[reply]
Re: Net::ftpssl put command doesn't work? by Anonymous Monk on Aug 28, 2009 at 15:50 UTC
Maybe the file is being auto-deleted, ftp servers do that sometimes.	[reply]