Greetings andrew,

Please read my post about this very issue I sent to you earlier today. The answer you seek is in the code toward the lower-half of the post. Now granted, it's not the best code or example around, but it'll do what you need.

-gryphon
code('Perl') || die;