Added Unit6Subroutines.pl

Saved me more pain in the future by moving all of the subroutines to a
different perl script.