about summary refs log tree commit
path: root/Net/FTP.pm
diff options
context:
space:
mode:
Diffstat (limited to 'Net/FTP.pm')
-rw-r--r--Net/FTP.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/Net/FTP.pm b/Net/FTP.pm
index e0a275e..8096c43 100644
--- a/Net/FTP.pm
+++ b/Net/FTP.pm
@@ -739,7 +739,7 @@ sub _store_cmd {
   $sock = $ftp->_data_cmd($cmd, grep { defined } $remote)
     or return undef;
 
-  $remote = ($ftp->message =~ /FILE:\s*(.*)/)[0]
+  $remote = ($ftp->message =~ /\w+\s*:\s*(.*)/)[0]
     if 'STOU' eq uc $cmd;
 
   my $blksize = ${*$ftp}{'net_ftp_blksize'};