Help for this page

Select Code to Download


  1. or download this
    use File::Find;

...
}, $path);

print "@found";
  2. or download this
    D:\ENV>perl pm10.pl
d:\env\videos/2012
...
D:\ENV>perl pm10.pl

D:\ENV>