perl LockFile-Simple