$m = 20; print noop(++$m) + $m++; sub noop{ return shift }