Я хочу использовать AnyEvent::DNS для разрешения моего домена на некоторых DNS-серверах. Список серверов получен от двух мест, каждый из которых содержит около 60 серверов. Когда я запускаю решение то
Я пытаюсь выполнить асинхронные запросы с использованием HTTP-модуля Perl AnyEvent со следующим кодом. my $headers = {
'Accept' => 'text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0
Мы создаем большое приложение со сложной логикой, состоящей из модулей. Я использовал для создания больших методов масштаба более простых методов, например, # fig. 1
package Foo;
sub highlevel {
Я пытаюсь создать модуль perl, который пингует (используя систему linux ping) сотням хостов и получает данные из ping (например, потери пакетов и сколько переданных пакетов и сколько полученные и т. д