while(<FILE>){
  chomp;
  push @data, split(/,/,$_);
}

##</code><code>##

my @data = ();
while(<FILE>){
  chomp;
  push @data, [ split(/,/,$_) ];
}

##</code><code>##

print data[0][0]; # prints the first element of the first line
print data[4][3]; # prints the fifth element of the fourth line