say -2+sum ([X*] map {1,$_ X*1,$_+1},(2,*²...65536)) »<=»get