Да, вначале запускаю первый скрипт, потом, пока он спит 60 секунд, запускаю второй.
Если не нравиться, что второй скрипт открывает на чтение, могу и на запись попробовать, результат тот же.
Файл lock_test.txt в начале не существуют.
Первый скрипт:
open(F,">lock_test.txt");
flock(F,2);
print F "This is my text.";
sleep(60);
close(F);
Второй скрипт (запускается через 5 секунд после старта первого):
if (open(F,">lock_test.txt"))
{ print "\\n\\nlock_test.txt opened for writing.";
print F "Whtat the fuck?!";
close(F);
}
else
{ print "\\n\\nlock_test.txt not opened!";
}
Вывод второго: "lock_test.txt opened for writing.".
В файле lock_test.txt содержится текст "This is my text."
Ну так как же проверить, заблокирован ли файл?