$ perl -w -c -e 'if($status = 0) { $status = 1 }'
Found = in conditional, should be == at -e line 1.
-e syntax OK