Async::Queueをリリース - DebugIto's diary
PerlモジュールAsync::Queueをリリースした。 http://search.cpan.org/perldoc?Async%3A%3AQueue このモジュールは、あらかじめ登録した非同期処理を立て続けに実行する際に、実行並列度に制限をかけてFIFO実行してくれる、というもの。 ぶっちゃけた話、async.jsのqueueオブジェクトと同じ。(同じAPIを切ってある) 以下、使用例。 use strict; use warnings; use AnyEvent; use AnyEvent::HTTP; use Async::Queue; my $q = Async::Queue->new(concurrency => 3, worker => sub { my ($url, $callback) = @_; print STDERR "Start $url\n"; http_ge
Asynchronous MySQL Queries in Perl Using DBD::mysql and AnyEvent | hoelzro [blogs.perl.org]
A lot of people use MySQL, and these days, asynchronous-style programming has really taken off. If you're involved in both of these camps, you may be wondering how to send a query to MySQL and have it inform your event loop when it's ready with the results of that query. A common solution is to use a thread or child process for each connection, and exchange data using IPC. However, if you're using
AnyEvent::SMTPで非同期メール送信 - black-mountain-sideの日記
サンプル。（ほぼSYNOPSIS？...） 以下のように送信SMTPサーバを指定していない場合、DNS問合せ結果のMXレコードのホストにSMTP接続してくれる。 （もちろん"host"で指定も可能） anyevent_smtp.pl #!/usr/bin/perl use strict; use warnings; use AnyEvent::SMTP 'sendmail'; my @to = ('foo@example.jp','bar@example.com'); my $msg = "Subject: Test message\r\n\r\nHello world."; my $cv = AnyEvent->condvar; sendmail from => 'me@foo.com', to => \@to, data => $msg, cv => $cv, cb => sub {
1
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
