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