Help for this page

Select Code to Download

Select or download this

if (defined (@ARGV) $ARGV[0]=~/-all/)    
{        
...
} else {
   $mode="";     
}

Select or download this
```
if (-d $file) {
   &scandir;
```