perl -le "print hex('1234') + hex('4321')"
21845
perl -le "print hex('0x1234') + hex('0x4321')"
21845