my @lines = map [split], <$sheet>;