If the example calc.pl is run using perl v5.8.8 on windows XP, the code runs ok but I get 2 warnings:
Use of uninitialized value in string eq at C:/Perl/site/lib/Win32/GuiTest.pm lin
This arises in the sub FindWindowLike() in the 'if($_ eg...)' tests.
Copying the the version of this if structure from v1.56 (availible on cpan but not as far as I can tell as a ppm package) fixes the problem. Briefly this change tests if(defined($_) before performing the eq test.
Could someone make v1.56 availible as a ppm package?