pjs/webtools/bonsai/testlock.pl

13 строки
137 B
Perl
Исходник Обычный вид История

#!/usr/bin/perl --
1998-06-17 01:43:24 +04:00
# -*- Mode: perl; indent-tabs-mode: nil -*-
require 'utils.pl';
Lock();
print "Got lock.\n";
sleep 10;
Unlock();