Thank for you suggeston which does indeed give me sufficient to solve this isse.
I will indeed follow your points about further posts. It has been a while since I have been at all active in asking Perl Monks questions whose answers in the past have been invaluable.