I tried to run your code but it's now working. I have a file in the same directory called data.txt (the file w/all of the info in it).. here's the script file i'm runninng

#!/usr/local/bin/perl

    open (DATA,"<data.txt")
        || die "Can't open $DATA $!";

while (<DATA>) {
  chomp;
  @line = split(/,/);
  $key = shift @line;
  push @{$data{$key}}, \@line;
}
print $data{"Andrea"}[0][1], " should be good\n"; # offsets off by one
+
print $data{"Dave"}[0][1], " should be better\n";
print $data{"Joe"}[0][1], " should be 0\n";
[download]

Here are the errors

syntax error in file data.pl at line 10, next 2 tokens "@$data"
Spurious backslash ignored at data.pl line 10.
syntax error in file data_824.pl at line 14, next 2 tokens "}["
syntax error in file data.pl at line 15, next 2 tokens "}["
Execution of data.pl aborted due to compilation errors.
[download]

sorry if i was confusing.