ไฟล์ :: LockDir เป็นพื้นฐาน Perl ชื่อไฟล์ระดับล็อคยูทิลิตี้
สรุป
ใช้ไฟล์ :: LockDir;
INTERFACE
ใหม่
เริ่มต้นเรียน ส่งคืนวัตถุเดี่ยว
nflock (ไฟล์ $ $ nap_till, ตู้ $ $ lockhost)
ล็อคชื่อไฟล์ที่จัด เพียง $ file ที่จำเป็น
$ file เป็นไฟล์ที่ถูกล็อค; $ nap_till คือจำนวนของเวลาที่จะรอก่อนที่จะให้ขึ้น ล็อกเกอร์ $ เป็นชื่อระบุล็อกเกอร์; $ lockhost เป็นเจ้าภาพขอล็อค
nunflock (ไฟล์ $)
ปลดล็อคไฟล์ที่จัดมาให้
nlock_state (ไฟล์ $)
ตรวจสอบสถานะของการล็อคไฟล์ที่จัดมาให้ ส่งกลับรายการ: รายการแรกเป็นจริงถ้าไฟล์จะถูกปลดล็อคและเท็จถ้าไม่ได้; รายการที่สองคือ undef ถ้าไฟล์จะถูกปลดล็อกและตัวตน (ชื่อและโฮสต์) มันถูกล็อก
วินิจฉัย
% s ล็อคแล้ว
การกระทำเมื่อคุณได้ล็อคแล้วชื่อพา ธ ที่ร้องขอ ให้ข้อมูลเท่านั้น
ไม่มีชื่อพา ธ ที่ถูกล็อค
คุณไม่ได้จัดหาชื่อพา ธ ที่จะล็อคเพื่อ nflock ร้ายแรง
ไม่สามารถเขียนไปยังไดเรกทอรี% s
ไดเรกทอรีที่อยู่ไฟล์ไม่สามารถเขียนได้ดังนั้นแฟ้มล็อคไม่สามารถสร้าง
ไม่สามารถได้รับ% s:% s
ชื่อล็อคไม่สามารถ gotten: เหตุผลที่จะมา ความล้มเหลวที่เกิดขึ้นหลังจากที่สิบพยายามที่จะได้รับการล็อค
% s% s [% s]: ล็อค% s ที่จัดขึ้นโดย% s
ล็อคไฟล์ที่ระบุเป็นความช่วยเหลือโดยล็อกเกอร์ตั้งข้อสังเกต ข้อความ informatory พิมพ์เฉพาะเมื่ออยู่ในการแก้จุดบกพร่อง
ใกล้ล้มเหลวสำหรับ% s:% s
ไฟล์ที่มีข้อมูลการล็อคไม่สามารถปิดด้วยเหตุผลที่แสดง
ปล่อยล็อค% s
ข้อความ Debug; . ตั้งข้อสังเกตว่าล็อคไฟล์ที่ระบุถูกปล่อยออกมาประสบความสำเร็จ
ต้องการ
- Perl
ความคิดเห็นที่ไม่พบ