Yeah, perl would be nice, however, a script is easier to install, and seems easier for ad hoc queries.

If only there were perlscript.