in reply to Deleting Folders

Since you are alread in the right folder why guess the maybe wrong path again? replace this part with your foreach loop and retry. Perhaps you need to write $ftp_disco->rmdir($folder, 1) to clear the directory. 
foreach $folder (@iqfolder_arr)
{ 
 $ftp_disco->rmdir($folder) || die "FTP Message> @{[ $ftp_disco->messa
+ge ]}\n";
}

[download]
Boris

Replies are listed 'Best First'.
Re: Re: Deleting Folders
by new_monk (Sexton) on Feb 06, 2004 at 15:51 UTC
    Boris, I tried that today and I got the same message...

    foreach $folder (@iqfolder_arr)
{ 
 #my $dirpath = '/ep005/egate/client/iq/';
 #$dirpath .= $folder;
 print($folder);
 $ftp_disco->rmdir($folder, 1) || die "FTP Message>@{[ $ftp_disco->mes
+sage ]}\n";

}

    [download]


    Here is the error message:
    {E9424A48-0086-11D7-AE05-AD16EA76821A}FTP Message>{E9424A48-0086-11D7-AE05-AD16E A76821A}: Do not specify an existing file.
[reply]
[d/l]
      Hmm, I have no clue, try $ftp_disco->rmdir("\Q$folder",1); and try to rename a folder and retry it with your script.
      Boris
[reply]
[d/l]

In Section Seekers of Perl Wisdom