Select Code to Download

my $textEntry = $mainWindow -> Entry(-state => 'normal') -> pack( -sid
+e => 'bottom', -expand => 'BOOLEAN');
$textEntry -> bind('<Return>' => &get);
...
    my $text = $textEntry -> get();
    print "$text\n";
}

Tk::Error: Can't locate auto/Tk/Entry/1.al in @INC (@INC contains: /et
+c/perl /usr/local/lib/perl/5.10.0 /usr/local/share/perl/5.10.0 /usr/l
+ib/perl5 /usr/share/perl5 /usr/lib/perl/5.10 /usr/share/perl/5.10 /us
+r/local/lib/site_perl .) at /usr/lib/perl5/Tk.pm line 423
 Carp::croak at /usr/share/perl/5.10/Carp.pm line 44
...
 <Key-Return>
 (command bound to event)