Your IP : 216.73.216.1

Current Path : /usr/lib64/perl5/vendor_perl/Tk/
Upload File :
Current File : //usr/lib64/perl5/vendor_perl/Tk/Event.pm

package Tk::Event;
use vars qw($VERSION $XS_VERSION @EXPORT_OK);
END { CleanupGlue() }
$VERSION = '4.035';
$XS_VERSION = '804.034';
$XS_VERSION =~ s{_}{};
use base  qw(Exporter);
use XSLoader;
@EXPORT_OK = qw($XS_VERSION DONT_WAIT WINDOW_EVENTS  FILE_EVENTS
                TIMER_EVENTS IDLE_EVENTS ALL_EVENTS);
XSLoader::load 'Tk::Event',$XS_VERSION;
require   Tk::Event::IO;
1;
__END__