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