I'm not sure where the right place here on perlmonks is to share coding examples.

That would probably be Cool Uses for Perl (or sometimes Meditations). What would be great is if you turn your snippet into a runnable example (along the lines of SSCCE), that is, with the necessary use statements, and example of how to establish the connection, etc., so that it's easy to just download and run. In any case, thanks for sharing!