$ WS "#if defined(F_SETLK) && defined(F_SETLKW)"
$ WS " struct flock flock;"
$ WS " int retval, fd;"
-$ WS " fd = open(""try.c"", O_RDONLY);"
+$ WS " fd = open(""[-]perl.c"", O_RDONLY);"
$ WS " flock.l_type = F_RDLCK;"
$ WS " flock.l_whence = SEEK_SET;"
$ WS " flock.l_start = flock.l_len = 0;"