Help for this page

Select Code to Download

Select or download this

 opendir DIR, "directory/";
my @files = grep { $_ ne '.' && $_ ne '..' } readdir DIR;
closedir DIR;

Select or download this
```
 print <<ENDHTML;
@array
ENDHTML
```