in reply to Re^4: Iterating Through Cell Blocks with Spreadsheet::Read
in thread Iterating Through Cell Blocks with Spreadsheet::Read
Yes indeed, chexmix, recommended change was made on all affected lines. Here's the revised test script:
Hopefully it helps you see my error. Regards, Hammeruse Spreadsheet::Read; my $inbook = "Data_File.xlsx"; $book = ReadData ($inbook); my @x = qw(F G H I J K); for my $sheet_index (1 .. $sheet_count) { my $sheet = $book->[$sheet_index] or next; foreach (@x) { $name = $sheet{"${_}28"}; $strain = $sheet{"${_}29"}; $initdensity = $sheet{"${_}30"}; $finaldensity = $sheet{"${_}31"}; $avedensity = $sheet{"${_}32"}; print "Found sheet with label: $sheet{label}\n"; print "COL=$_ $name $strain $initdensity $finaldensity $avedens +ity\n"; } }
|
---|
Replies are listed 'Best First'. | |
---|---|
Re^6: Iterating Through Cell Blocks with Spreadsheet::Read
by AnomalousMonk (Archbishop) on Oct 08, 2013 at 19:55 UTC | |
by Hammer2001 (Novice) on Oct 08, 2013 at 20:18 UTC | |
by AnomalousMonk (Archbishop) on Oct 08, 2013 at 20:41 UTC | |
by Hammer2001 (Novice) on Oct 08, 2013 at 21:41 UTC | |
by AnomalousMonk (Archbishop) on Oct 08, 2013 at 22:15 UTC | |
| |
by Anonymous Monk on Oct 08, 2013 at 21:51 UTC |
In Section
Seekers of Perl Wisdom