It's enigma all over again. The code is short and to the point, just how Perl should be. Sparky