$/=[|@($/=words),$1,$2];say sum map {my (\a,\b,\c,\d)=$/[^4+1+$_*2];a*d -b*c},^$0