Sharing code between projects is always good. Cut and paste is not a good way to share code, though.

perlmod gives advice on writing modules.

If this code were executed by the sub import of a module MyInit.pm which you wrote, then the following code would be all that each little script would need.

use MyInit;
[download]