I can't get the 'Exporter' to work when I 'use Win32::GUI'. Example code
included below. Any fix? Anything I misunderstand?
Cygwin Perl v5.8.7
Win32::GUI Win32-GUI-1.03 (12 Apr 2006)
art
# GUI.pl
package GUI;
use GUI::Win; # Windows GUI Examples
WindowStart(); # Undefined subroutine &GUI::WindowStart called
at GUI.pl line 11.
# GUI/Win.pm
package GUI::Win;
use Win32::GUI; # works when commented, fails when not
use Exporter; # Export symbols
use vars qw($VERSION @ISA @EXPORT);
our @ISA = qw(Exporter);
our @EXPORT = qw(WindowStart);
our $VERSION = '1.00.00';
sub WindowStart {
print "ABC\n";
return 1;
} ### WindowStart
1;