Help for this page
$_=6491; sum(some_function(split//));
s/(\d)/$s+=$1/ge; # $s is the sum... ... # But thenagain, this is even shorter: $s+=$_ for/./g;