Added the Perl5 version of my clean-home script