Understood. As someone mentioned earlier this is old cold. It was originally written in 1994 and is Perl 4. Thanks everyone for the input.