for my $n ( 1 .. $Excel->Workbooks->Count) #### for my $n ( reverse 1 .. $Excel->Workbooks->Count)