NodeReaper has asked for the wisdom of the Perl Monks concerning the following question:
Please post code showing what you have tried so far.