> I just installed the TK module from ActiveState on my NT4.0 machine
> (build 1381, SP 4)
> I entered some code:
> #!usr/local/bin/perl -w
> use English;
> require Tk;
> use Tk;
> use strict;
> my $Version = "1.0";
> my $main = MainWindow->new();
> $main->minsize(qw(350 250));
> $main->configure(-title=>'verify user',-background=>'gray');
> my $vu_frm1 = $main->Frame(-relief=>'groove',-borderwidth=>3,-
> my $vu_lbl = $vu_frm1->Label(-text=>'Enter Username',-
> # this is where the error seems to happen . . .
> my $vu_enl = $vu_frm1->Entry(-width=>8,-background=>'gray',)->pack(-
> When I try to run this code, I get:
> Subroutine exit redefined at d:/perl/lib/Tk.pm line 63.
> "$XS_VERSION" is not exported by the Tk module at
> d:/perl/site/lib/Tk/Entry.pm line 26
> Can't continue after import errors at d:/perl/site/lib/Tk/Entry.pm line
I don't get this error on my linux machine, with Perl 5.005_03 and Tk
> The offending line 26 from Entry.pm reads:
> import Tk qw(Ev $XS_VERSION);
> This is my first experience with an error being reported in a module.
> I have found no troubleshooting hints in the documentation, and it
> seems to be independent of the options that I feed to Event.
> Please point me to documentation that might help me resolve this.
The only thing I can think of is that you have a corrupted Tk
installation. Anyway, I crossposted this article to the
comp.lang.perl.tk newsgroup. Maybe someone over there can aid you