Bebo has asked for the wisdom of the Perl Monks concerning the following question:
I'm positive that the error has something to do with the "WithEvents" line, because adding it causes the script to break. However, this is exactly how all the examples I've seen have done it. Comments would be greatly appreciated!use Win32::OLE::Variant; use Win32::OLE qw( EVENTS in with valof ); Win32::OLE->Option( Warn => 3); my $ie = Win32::OLE->new('InternetExplorer.Application'); Win32::OLE->WithEvents($ie, \&cleanExit, 'DWebBrowserEvents2');
|
|---|