perl -le "print 0x10 + 1" 17