… | |
… | |
79 | package EV; |
79 | package EV; |
80 | |
80 | |
81 | use strict; |
81 | use strict; |
82 | |
82 | |
83 | BEGIN { |
83 | BEGIN { |
84 | our $VERSION = '0.03'; |
84 | our $VERSION = '0.1'; |
85 | use XSLoader; |
85 | use XSLoader; |
86 | XSLoader::load "EV", $VERSION; |
86 | XSLoader::load "EV", $VERSION; |
87 | } |
87 | } |
88 | |
88 | |
89 | @EV::Io::ISA = "EV::Watcher"; |
89 | @EV::Io::ISA = |
90 | @EV::Time::ISA = "EV::Watcher"; |
|
|
91 | @EV::Timer::ISA = "EV::Time"; |
90 | @EV::Timer::ISA = |
92 | @EV::Periodic::ISA = "EV::Time"; |
91 | @EV::Periodic::ISA = |
93 | @EV::Signal::ISA = "EV::Watcher"; |
92 | @EV::Signal::ISA = |
94 | @EV::Idle::ISA = "EV::Watcher"; |
93 | @EV::Idle::ISA = |
95 | @EV::Prepare::ISA = "EV::Watcher"; |
94 | @EV::Prepare::ISA = |
96 | @EV::Check::ISA = "EV::Watcher"; |
95 | @EV::Check::ISA = |
97 | @EV::Child::ISA = "EV::Watcher"; |
96 | @EV::Child::ISA = "EV::Watcher"; |
98 | |
97 | |
99 | =head1 BASIC INTERFACE |
98 | =head1 BASIC INTERFACE |
100 | |
99 | |
101 | =over 4 |
100 | =over 4 |
… | |
… | |
299 | =head1 THREADS |
298 | =head1 THREADS |
300 | |
299 | |
301 | Threads are not supported by this in any way. Perl pseudo-threads is evil |
300 | Threads are not supported by this in any way. Perl pseudo-threads is evil |
302 | and must die. |
301 | and must die. |
303 | |
302 | |
304 | =head1 BUGS |
|
|
305 | |
|
|
306 | Lots. Libevent itself isn't well tested and rather buggy, and this module |
|
|
307 | is quite new at the moment. |
|
|
308 | |
|
|
309 | Please note that the epoll method is not, in general, reliable in programs |
|
|
310 | that use fork (even if no libveent calls are being made in the forked |
|
|
311 | process). If your program behaves erratically, try setting the environment |
|
|
312 | variable C<EVENT_NOEPOLL> first when running the program. |
|
|
313 | |
|
|
314 | In general, if you fork, then you can only use the EV module in one of the |
|
|
315 | children. |
|
|
316 | |
|
|
317 | =cut |
303 | =cut |
318 | |
304 | |
319 | our $DIED = sub { |
305 | our $DIED = sub { |
320 | warn "EV: error in callback (ignoring): $@"; |
306 | warn "EV: error in callback (ignoring): $@"; |
321 | }; |
307 | }; |