Nope, I have no code to share. Just the little snippet above. I've thought about others, though. I think Genesis would be a very interesting Perl script. However, I'll leave that to others with a better knowledge of Perl than I.