> -----Original Message----- > From: activeperl-boun...@listserv.activestate.com [mailto:activeperl- > boun...@listserv.activestate.com] On Behalf Of Philip Prindeville > Sent: 22 August 2012 22:52 > To: ActivePerl@listserv.ActiveState.com > Subject: Known issues with Win32::OLE? > > 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.
I may be missing something, but if you want to test a GUI, wouldn't something like Win32::GuiTest be more useful? -- Brian Raven Please consider the environment before printing this e-mail. This e-mail may contain confidential and/or privileged information. If you are not the intended recipient or have received this e-mail in error, please advise the sender immediately by reply e-mail and delete this message and any attachments without retaining a copy. Any unauthorised copying, disclosure or distribution of the material in this e-mail is strictly forbidden. _______________________________________________ ActivePerl mailing list ActivePerl@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs