Having trouble with Spreadsheet::Read hash

[testingPerl]

Hey everyone. I'm using Spreadsheet::Re ad to grab data from an excel .xls file and I can't figure out how to loop through the hash and display the data. Using print works but I would like to print column A1 through A100 without having to manual type them all out. I tried a lot of different things so any help would be really appreciated. Here is the code I've got so far:

#!/usr/bin/perl -w

use strict;
use Spreadsheet::Read;
use Data::Dumper;

my $xls = ReadData ("test.xls");

print $xls->[1]{'A1'};
print $xls->[1]{'A2'};
print $xls->[1]{'A3'};

exit;

[toolic]

Try this:

for my $cell (map { "A$_" } 1 .. 100) {
    print $xls->[1]{$cell};
}

[testingPerl]

Yessssss, Thank you so much!

I will be sure to come back here if I have any more questions. The if loop helped me figure out how to check if any cells contain the word "test":

#!/usr/bin/perl -w

use strict;
use Spreadsheet::Read;
use Data::Dumper;

my $xls = ReadData ("test.xls");


for my $cell (map { "A$_" } 1 .. 100) {
$_ = $xls->[1]{$cell};

	if (/test/) {
		print "found \"test\" in cell: $cell\n";
	}
}

exit;