Det är väldigt enkelt att skriva ut en lista över alla filer i en katalog med den inbyggda Perl glob-funktionen. Låt oss titta över ett kort skript som klistrar och skriver ut en lista över alla filer i katalogen som innehåller själva skriptet.
#! / usr / bin / perl -w
@files =;
foreach $ -fil (@files)
skriva ut $ -fil. "\ N";
När du kör programmet kommer det att visas filnamn för alla filer i katalogen, en per rad. Globen händer på den första raden, som tecken drar filnamnen in i @files-matrisen.
@files =;
Sedan använder du helt enkelt en förhandslinga för att skriva ut filerna i matrisen.
Du kan inkludera valfri väg i ditt filsystem mellan markeringarna. Till exempel, säg att din webbplats finns i / var / www / htdocs / katalogen och du vill ha en lista över alla filer:
@files =;
Eller om du bara vill ha en lista över filerna med tillägget .html:
@files =;