Supponiamo che tu stia creando uno script Perl per attraversare un file system e registrare ciò che trova. Quando apri gli handle di file, devi sapere se hai a che fare con un file reale o con una directory, che tratti diversamente. Volete glob una directory, così potete continuare ad analizzare ricorsivamente il filesystem. Il modo più rapido per distinguere i file dalle directory è utilizzare il Perl integratoOperatori di prova file. Perl ha operatori che puoi usare per testare diversi aspetti di un file. L'operatore -f viene utilizzato per identificare i file regolari anziché le directory o altri tipi di file.
Per prima cosa crei due corde: uno che punta a un file e uno che punta a una directory. Quindi, prova il $ filename con il -f operatore, che controlla se qualcosa è un file. Verrà stampato "Questo è un file". Se si prova l'operatore -f nella directory, non viene stampato. Quindi, fare il contrario per il $ DirectoryName e confermare che si tratta, in effetti, di una directory. Combina questo con una directory glob per ordinare quali elementi sono file e quali directory: