key idea is to make more subs
In reply to Re^9: Perl Script by Anonymous Monk in thread Perl Script by Anonymous Monk