Re^2: Some simple math and absolute values (updated)

Which can be "golfed" to

    $PFACT * ($weight, ($weight >= 0) * 2 - 1)[abs $weight < $MIN]
[download]

map{substr$_->[0],$_->[1]||0,1}[\*||{},3],[[]],[ref qr-1,-,-1],[{}],[sub{}^*ARGV,3]

Comment on Re^2: Some simple math and absolute values (updated) Select or Download Code