my @data = map { chomp; [ split ',' ] } <DATA>;