$/=!<>;$w+=3^($a[$_]^=2)for<>=~/\d+/g;print$w>>2