To find the contents of a directory in perl use the opendir function. * opendir() * Operats similar to the open file function open() * format: opendir(VARIABLE, '/full/directory/or/relative * Example: opendir(DIR, '.'); open the current directory you are in and set it as variable DIR * readdir() * reads the contents of the directory * closedir() * closes the variable set for the directory read * practical example * This finds all jpgs and gifs in a directory and displays them for a website opendir(DIR, '.'); while (defined($dir = readdir(DIR))) { if ( $dir =~ /\.jpg/i || $dir =~ /\.gif/i) { print " "; } } closedir(DIR); From HowTo Wiki, a Wikia wiki.
Attributes | Values |
---|---|
rdfs:label |
|
rdfs:comment |
|
dcterms:subject | |
abstract |
|