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