I'll prefix this with the comment that I have no clue what I'm doing -- I just wandered through a google search for "activeperl metabase" until I found something mildly useful. ;> Anyways, it looks like Win32::OLE is one way to do so, as is brought up (tangentially) here. Searching for metabase on that mailing list provided a few more hits.

Update: Wow! What I said made some sense, as rchiav also mentionned Win32::OLE.

 
perl -e 'print "I love $^X$\"$]!$/"#$&V"+@( NO CARRIER'