use bigint;$\=<>+($\*3-$\**3)/2%1e300for@INC;print