Adding cleandir - Perl script to view/delete files in directory