… | |
… | |
14 | EOF |
14 | EOF |
15 | exit 1; |
15 | exit 1; |
16 | } |
16 | } |
17 | |
17 | |
18 | print "*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***\n\n"; |
18 | print "*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***\n\n"; |
19 | |
|
|
20 | if ($] < 5.006) { |
|
|
21 | print <<EOF; |
|
|
22 | |
|
|
23 | *** |
|
|
24 | *** WARNING: This module is quite low-level and uses undocumented perl |
|
|
25 | *** internals to do it's job. While it seems to work fine with perl-5.[6-10] |
|
|
26 | *** it has not been tested with older versions. If it compiles and passes the |
|
|
27 | *** testsuite, it should work. Otherwise you should either upgrade or fix it ;) |
|
|
28 | *** |
|
|
29 | *** Marc Lehmann <schmorp\@schmorp.de> |
|
|
30 | *** |
|
|
31 | |
|
|
32 | EOF |
|
|
33 | } |
|
|
34 | |
19 | |
35 | if (eval { require Event }) { |
20 | if (eval { require Event }) { |
36 | if ($Event::VERSION < 0.86 or $Event::VERSION == 0.88) { |
21 | if ($Event::VERSION < 0.86 or $Event::VERSION == 0.88) { |
37 | print <<EOF |
22 | print <<EOF |
38 | |
23 | |
… | |
… | |
84 | VERSION_FROM => "Coro.pm", |
69 | VERSION_FROM => "Coro.pm", |
85 | DIR => ['Coro', ($EVENT ? 'Event' : ()), ($EV ? "EV" : ())], |
70 | DIR => ['Coro', ($EVENT ? 'Event' : ()), ($EV ? "EV" : ())], |
86 | PREREQ_PM => { |
71 | PREREQ_PM => { |
87 | common::sense => 0, |
72 | common::sense => 0, |
88 | Scalar::Util => 0.00, |
73 | Scalar::Util => 0.00, |
89 | AnyEvent => 4.81, |
74 | AnyEvent => 5.0, |
90 | Storable => 2.15, |
75 | Storable => 2.15, |
91 | Time::HiRes => 0, |
76 | Time::HiRes => 0, |
92 | Guard => 0.5, |
77 | Guard => 0.5, |
93 | |
78 | |
94 | # for Coro::Event |
79 | # for Coro::Event |