Re^3: Weighted Calculation

[2teez]

..but for some reason it's not working. Is the syntax correct?

If you are using perl version 5.10.0 and above, it should work. Of course the syntax is correct.
However, this also work:     $user_weight{$cols[0]} ||= 1;

The Defined-or operator was implemented in perl 5.10.0 check Defined-or-operator

Update:

Oops, I didn't see tye answer before posting mine, I had this post opened, then got distracted with some other things before submitting my post later. Only to refresh and see that mine post was in a way similar to his.
+1 tye all the same.

[AnomalousMonk]

However, this also work:   $user_weight{$cols[0]} ||= 1;

That will fail in the case in which the 'special' assigned weight for a worker is zero (maybe he or she is on vacation that week?): such a worker will be assigned a work-weight of 1.

Update: Perl versions lacking  // might use exists:
    $user_weight{$cols[0]} = 1 unless exists $user_weight{$cols[0]};