Thanks it certainly is useful and does perform deletion. However I have two queries:
(1) Komodo Edit reports:
Name "main::DATA" used only once: possible typo at bk_remove.pl line 7
readline() on unopened filehandle DATA at bk_remove.pl line 73.
This is referring to <DATA> in the code.
(2) It appears the code does the deletion based on the date listed in the filename, while this is ideal I've done the previous coding based on the day modified only (using -M) and not the date on the filename so I would like to keep it this way. Any ideas on how I could modify this to the way I did it?
Much appreciated for all answers, apologies I am not very good at perl however I do get the odd scripts here and there done when needed. Thanks again!