Select Code to Download

# Loop method from above:
foreach my $sheet ( in $xls->Worksheets ) {
...

# one line to get array of names:
my @names = map { $_->Name } in $xls->Worksheets;