[rt.cpan.org #53484] win32-ole breaks win32-gui-hyperlink on win64

[Paul Boldra via RT]

Thu Jan 07 11:27:19 2010: Request 53484 was acted upon.
Transaction: Ticket created by BOLDRA
       Queue: Win32-OLE
     Subject: win32-ole breaks win32-gui-hyperlink on win64
   Broken in: 0.1709
    Severity: Unimportant
       Owner: Nobody
  Requestors: bol...@boldra.org
      Status: new
 Ticket <URL: https://rt.cpan.org/Ticket/Display.html?id=53484 >


Using 32 bit strawberry 5.10.0 on 64 bit windows the following code doesn't
work:

use Win32::GUI;
use Win32::GUI::HyperLink;
use Win32::OLE;
my $win=Win32::GUI::Window->new( -size=>[200,200] );
my $hl = $win->AddHyperLink(
-text=>q{http://google.com}
,-pos=>[10,10]);

Win32::OLE->GetObject(q{./root/CIMV2/Win32_PhysicalMemory});
$hl->Launch;

This dies with the message "Failed opening http://google.com ShellExecute(5)
The requested lookup key was not found in any active activation context".
Without the Win32::OLE->GetObject call, the Hyperlink->Launch call works.

I'm not having this problem with 32 bit strawberry or cygwin perl (both 5.10.0)
on 32 bit windows.