perl -wle "print 0+'16'|0+'8'"
24