Rahushi has asked for the wisdom of the Perl Monks concerning the following question:
Hi,
I have written a small code for ftp to a remote machine and then go to one particular folder (based on some date) and then renaming the files. My problem is for some dates it works fine but for some, it does not get anything for the folder name (which I am getting using 'pwd'). Here is the snippet of my code -
Here, I am getting $EFFDATE properly in all cases but pwd does not return me anything for few dates. Any help will be highly appreciated. Thanks!!$file_type = '.txt'; if ($Filename !~ m/($file_type)$/) { $new_file_name = $Filename . '.txt'; $ftp->cwd($EffDate); $pwd_source = $ftp->pwd; &fide_msg ("I am here: $pwd_source"); $ftp->rename($Filename, $new_file_name); &f_msg ("$Filename does not have extension of .txt. Re +naming file to $new_file_name..."); }
|
---|
Replies are listed 'Best First'. | |
---|---|
Re: Need help for Net::FTP module
by Illuminatus (Curate) on Sep 26, 2012 at 16:42 UTC | |
by Rahushi (Initiate) on Sep 26, 2012 at 17:18 UTC | |
by Illuminatus (Curate) on Sep 26, 2012 at 18:42 UTC |
Back to
Seekers of Perl Wisdom