I would like to thank DeMerphq. As a perl neophyte any road signs pointing in the right direction are helpful.