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;

Reply via email to