@row = map [ split /\n?/ ], <$lines>;