Please type out and post No pictures, please. Write a Perl script to calculate the following.

Write a Perl script to do a little file count report for a given directory, as shown in the following figure. a) You may use a command argument to supply the directory you want to report b) Hint: use ls, grep, wc, regex, and pipe " root@ubuntuo:-/Documents/script Eile Edit View Serch erminal Help root@ubuntue:-/Documents/script bash dir-stat.sh Files in /root: Number of all items: 45 Number of all directories: 28 Number of all ordinary files: 17 Number of hidden items: 31 Number of hidden directories: 20 Number of hidden files: 11 root@ubuntu:/Documents/scripta