$\=1;$\*=(16- s/\b\w\b//g)**2for<>;print