I think you'll want to write a Word macro or some VB or VBA that will call your Perl script, passing it the current application and filename.