Need Perl Code for working in directory
Hi All,
I need a perl script for the following :
+++++++++++++++++++++++++++++++++++++++++++++
Write a script which takes a directory name and provides a series of statistics about that directory. It should say:
•How many files it contains
•How many of the files are readable and writable
•How many subdirectories it contains
•It should also break down all the files into file types based on the last 3 letters in their name. These should be
Listed with the most common extensions first.
If the name provided either doesn’t exist, or isn’t a directory the script should throw a helpful error message
++++++++++++++++++++++++++++++++++++++++++++++++++ ++
Please help me out
Thanks in advance
Regards,
Pankaj
|