This is a Perl script to tidy-up the subroutines of another perl script written in a custom format. It will copy the subroutines into a folder for future use.