Oh, right.  I guess the only simplification would be

$sum += substr($account, -$_, 1) * $_;
[download]

Anyway, good code.

  p