Help for this page

Select Code to Download

Select or download this

 foreach $loop (sort `cd $data_dir; ls -d *`) {
     chop($loop);
...
         }
     }
 }