in reply to Pop quiz: find the bug
SWITCH: { $id == $CASH && do{$tcash += $amt; last SWITCH}; ... } [download]
SWITCH: { $id == $CASH and $tcash += $amt, last SWITCH; ... } [download]
-Blake