Delete files and folders with perl command

Hello! With 98% to 99% completion rate, 850+ successfully completed projects, and a 5.00 reputation (maximum possible, 5.0) (Yes, not even 4.99 average rating, can be verified on my profile page https://www.freelancer.com/u/rajeshsonisl.html !!)... you can never go wrong choosing me :) I am available to get started on your project right away. I look forward to your reply. Thanks. Kind Regards, Rajesh Soni

Hello, I am the premier Perl scripting expert on these freelancing sites. I will create a Perl script to process a file hierarchy to remove all files and directories below a given directory. I will place the subroutine within a Perl module (.pm file) to be called from a Perl script (.pl file) and Perl/CGI script (.cgi file) that I shall provide. A milestone payment for the full budget for this project must be deposited with this site before your offer can be accepted. Alan Idler Chief Software Architect Idleswell Software Creations

Hello, I have more than 5 yers of linux experience and I can find you easily a solution, Thank you, Adrian

See rmtree function of the File::Path module. ********************************************************************************

A proposal has not yet been provided

Sir, the Perl one-liner you mention is just a cargo-cult solution that roams around the net. The stat[9] command is useless and so is the boolean comparison operator that immediately follows. As you correctly point out, this one-liner, minus the cargo-cult part, deletes all the files in a directory quite fast, but doesn't go into the tree. To achieve deltree functionality, we would need to create a subroutine that deletes all the files, calls itself recursively upon each of the subdirectories (if present) and then deletes the subdirectory. It can be done, but i'm not sure how it would perform in case the directory tree goes very, very deep and with a lot of branches. I hope it's not the case. On a side note, it's funny how many of the bidders don't even list "Perl" among their skills.

I have worked for 2 years in perl and knows many features. I used to to file delete and folder delete based on string and file name

My purpose is delete the content from the directory recursively, files and subdirectories. The script accept as parameter the name of the directory and delete all the content