I tried but get error message for this code: foreach $folder (@iqfolder_arr)
{
print("Printing from inside the last foreach but before rmdir: $fol
+der\n");
$ftp_disco->rmtree(['/ep005/egate/client/iq/$folder'], 1, 1) || die
+ "Error: @{[ $ftp_disco->message ]}\n";
}
Can't locate object method "rmtree" via package "Net::FTP" (perhaps you forgot t
o load "Net::FTP"?) at C:/Perl/eg/data/clr_IQ.pl line 86.
so I also tried:
foreach $folder (@iqfolder_arr)
{
print("Printing from inside the last foreach but before rmdir: $fol
+der\n");
rmtree(['/ep005/egate/client/iq/$folder'], 1, 1) || die "Error: @{[
+ $ftp_disco->message ]}\n";
}
but got this error:
Error: Opening data connection for ..
Transfer complete.
|