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