fix some syntax errors

detected by running genome-perl -Ilib t/01_one_lock.t