In the process of your function, you consume the array given to you. If this were a fixed array provided by reference, you would trash it, rendering it useless for subsequent operations. Penalty is 7 characters:      @p=@$p; Further, I don't know of any currencies which use millionths of a unit, so why 1e-9 is even relevant is beyond me. Yikes!