Worked like a charm, thanks. The first reply for some reason did not and returned all upper case letters. Seems I don't know perl as good as I thought ;].