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";
}
[download]

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";
}
[download]

but got this error: Error: Opening data connection for .. Transfer complete.