If you can't use the Perl modules directly, then lift the regex from the modules. However, it's quite long, and it's quite long for a reason. Be sure you read my other posts in this thread to avoid disinformation and misinformed people who think they are helping.