… | |
… | |
61 | |
61 | |
62 | BEGIN { |
62 | BEGIN { |
63 | if ($ARGV[0] eq "run") { |
63 | if ($ARGV[0] eq "run") { |
64 | shift; |
64 | shift; |
65 | |
65 | |
66 | #TODO: watchdog? how? |
66 | # d'oh |
67 | #require AnyEvent::Watchdog; |
67 | eval "use AnyEvent::Watchdog qw(autorestart heartbeat=300)"; |
|
|
68 | |
68 | require AnyEvent; |
69 | require AnyEvent; |
69 | require AnyEvent::MP; |
70 | require AnyEvent::MP; |
70 | AnyEvent::MP::initialise_node (@ARGV); |
71 | AnyEvent::MP::initialise_node (@ARGV); |
71 | |
72 | |
72 | AnyEvent::detect () eq "AnyEvent::Impl::E" |
73 | AnyEvent::detect () eq "AnyEvent::Impl::E" |