in reply to WMI with Perl

Did you try googling? Here's an article link

In Section Seekers of Perl Wisdom