لنفترض أنك تقوم ببناء برنامج نصي Perl لاجتياز نظام الملفات وتسجيل ما يعثر عليه. أثناء فتح مقابض الملفات ، تحتاج إلى معرفة ما إذا كنت تتعامل مع ملف فعلي أو مع دليل ، والذي تعامل معه بشكل مختلف. تريد أن تقوم بدليل دليل ، بحيث يمكنك الاستمرار في تحليل نظام الملفات بشكل متكرر. أسرع طريقة لإخبار الملفات من الدلائل هي استخدام بيرل المضمنةعوامل اختبار الملف. لدى Perl عوامل تشغيل يمكنك استخدامها لاختبار الجوانب المختلفة للملف. يتم استخدام عامل التشغيل -f لتحديد الملفات العادية بدلاً من الأدلة أو أنواع أخرى من الملفات.
أولاً ، أنت تصنع سلسلتين: واحد يشير إلى ملف واحد يشير إلى دليل. بعد ذلك ، اختبار اسم الملف $ مع ال -F عامل التشغيل ، الذي يتحقق لمعرفة ما إذا كان هناك شيء ملف. سيتم طباعة "هذا ملف". إذا جربت عامل -f في الدليل ، فلن تتم طباعته. ثم افعل عكس ذلك اسم الدليل $ وتأكيد أنه في الواقع دليل. اجمع هذا مع دليل جوي لفرز العناصر التي هي ملفات وأي أدلة: