$ perl -lwe 'print shift() + 4' 012 16 $ perl -lwe 'print 012 + 4' 14 $ perl -lwe'print "012" + 4' 16 $