In reply to Re^4: sample code from Perl Journal by Anonymous Monk in thread sample code from Perl Journal by Anonymous Monk