@couples = map [ pop @brides, pop @brothers ], 1..7;