$ftp->rmdir ( "${Ordered_List[$Index]}", 1 );

##</code><code>##

if ($ftp->rmdir ( "${Ordered_List[$Index]}", 1 )) {
    say "rmdir succeeded";
} else {
    say "rmdir failed";
}