Help for this page
my @data = map { chomp; [ split ',' ] } <DATA>; ... ] } <DATA>;
my @data = map ... ] } <DATA>;