The answer to your question is that you just add the array subscripting to what you're already dereferencing: 
$sheet{$_}->{data}[$column];

[download]

But I think your problem is better suited to arrays of arrays: 

use strict;
use warnings;

my @columns = split ' ', <DATA>; # First row is column headers
my @data = map { [ split ' ', $_ ] } <DATA>; # Other rows are data

print "@columns Total\n";
# First column is not numeric, an extra numeric column is
# on the right for the total of the row totals
my @column_totals = ('Total', (0) x @columns-1, 0);
for my $row (@data) {
    my $row_total = 0;
    for my $col (1..$#columns) {
        $row_total += $row->[$col];
        $column_totals[$col] += $row->[$col];
    }
    print "@$row $row_total\n";
    # Last column of column totals is sum of row totals
    $column_totals[$#column_totals] += $row_total;
}
print "@column_totals\n";
__DATA__
employee Buffalo Cleveland
Terry 5.00 2.00
Doug 4.00 3.00
Fred 1.00 5.00

[download]
Caution: Contents may have been coded under pressure.

In reply to Re: Dereferencing Hashes of Arrays by Roy Johnson
in thread Dereferencing Hashes of Arrays by Anonymous Monk

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.