I am trying to build a template for Perl scripts so that they would do at least most of the basic thing