Tarkime, kad kuriate „Perl“ scenarijų, kad galėtumėte aplankyti failų sistemą ir įrašyti tai, ką jis randa. Kai atidarote failų rankenas, turite žinoti, ar kalbate apie faktinį failą, ar su direktorija, kurią vertinate skirtingai. Norite aplanką sudėti į katalogą, kad galėtumėte toliau rekursyviai analizuoti failų sistemą. Greičiausias būdas pasakyti failus iš katalogų yra naudoti įmontuotą „Perl“Failų tikrinimo operatoriai. „Perl“ turi operatorių, kuriuos galite naudoti išbandydami įvairius failo aspektus. Operatorius -f naudojamas identifikuoti įprastus failus, o ne katalogus ar kitų tipų failus.
Pirma, jūs sukuriate dvi stygos: vienas nukreiptas į failą, kitas - į katalogą. Tada išbandykite $ failo vardas su -f operatorius, kuris patikrina, ar nėra failo. Tai atspausdins „Tai yra failas“. Jei pamėginsite -f operatorių kataloge, jis nespausdins. Tada darykite priešingai $ katalogo vardas ir patvirtinkite, kad tai iš tikrųjų yra katalogas. Sujunkite tai su katalogo glob išsiaiškinti, kurie elementai yra failai, o kurie - katalogai: