… | |
… | |
29 | reload_archetypes & |
29 | reload_archetypes & |
30 | ext::help::reload & |
30 | ext::help::reload & |
31 | ext::books::reload & |
31 | ext::books::reload & |
32 | ext::map_tags::reload & |
32 | ext::map_tags::reload & |
33 | ext::map_world::reload & |
33 | ext::map_world::reload & |
34 | print JSON::XS->new->pretty->encode({cf::mallinfo}) |
34 | while (EV::TIMEOUT & Coro::EV::timed_io_once \$fh, EV::READ, 1) { Coro::Debug::command "ps" } & |
|
|
35 | ({cf::mallinfo}) |
35 | EOF |
36 | EOF |
36 | print $fh "\n> "; |
37 | print $fh "\n> "; |
37 | |
38 | |
38 | my $iow; $iow = EV::io $fh, EV::READ, sub { |
39 | my $iow; $iow = EV::io $fh, EV::READ, sub { |
39 | if (defined (my $cmd = <$fh>)) { |
40 | if (defined (my $cmd = <$fh>)) { |