Known issues with Win32::OLE?

Philip Prindeville <[email protected]> Wed, 22 Aug 2012 15:51:37 -0600
Newsgroups gmane.comp.lang.perl.active-perl
Message-ID <[email protected]>
I was originally going to check the list archives before posting, but I get a 403 from pipermail on the website, so can't do that.

I'm running ActiveState perl (community version) on Win7-x64 updated, and wrote the following simple/stupid test program.

#!/usr/bin/perl -w

use strict;
use warnings;

sub obj_cb($)
{
  my $obj = shift;
  my $class = Win32::OLE->QueryObjectType($obj);
  printf STDERR "%s=>%s\n", $obj, $class;
}

my $count = Win32::OLE->EnumAllObjects(\&obj_cb);

printf STDERR "count=%d\n", $count;

exit 1;

and running it (both as myself and as Administrator) I get:

count=0

Anyone have a simple/stupid program that detects whatever programs are present that are manipulable via OLE?

I'm trying to get up to speed on Win32::OLE so I can write some test-automation tools to exercise our products' GUIs.

Thanks,

-Philip
_______________________________________________
ActivePerl mailing list
[email protected]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs