Katakanlah Anda sedang membuat skrip Perl untuk menelusuri sistem file dan merekam apa yang ditemukannya. Saat Anda membuka pegangan file, Anda perlu tahu apakah Anda berurusan dengan file yang sebenarnya atau dengan direktori, yang Anda perlakukan berbeda. Anda ingin membuat glob sebuah direktori, sehingga Anda dapat terus mengurai sistem file secara rekursif. Cara tercepat untuk memberi tahu file dari direktori adalah dengan menggunakan built-in PerlMenguji Operator File. Perl memiliki operator yang dapat Anda gunakan untuk menguji berbagai aspek file. Operator -f digunakan untuk mengidentifikasi file biasa daripada direktori atau jenis file lainnya.
Pertama, Anda buat dua string: satu menunjuk pada suatu file dan satu menunjuk pada suatu direktori. Selanjutnya, uji $ nama file dengan -f operator, yang memeriksa untuk melihat apakah ada file. Ini akan mencetak "Ini adalah file." Jika Anda mencoba operator -f pada direktori, ia tidak akan mencetak. Kemudian, lakukan yang sebaliknya untuk
$ directoryname dan konfirmasi bahwa itu sebenarnya adalah sebuah direktori. Kombinasikan ini dengan sebuah direktori glob untuk memilah elemen mana yang merupakan file dan mana yang direktori: