[B! POE] monjudohã®ãƒ–ãƒƒã‚¯ãƒžãƒ¼ã‚¯

monjudoh id:monjudoh

POEã«é–¢ã™ã‚‹monjudohã®ãƒ–ãƒƒã‚¯ãƒžãƒ¼ã‚¯ (7)

${{author_name}}$

{{{comment_expanded}}}

{{label}}

{{#is_bookmark}}ãƒªã‚¹ãƒˆ{{/is_bookmark}}{{^is_bookmark}}ãƒªãƒ³ã‚¯{{/is_bookmark}}

${{author_name}}$
{{author_name}}{{created}}
{{ #comment }}{{ comment }}{{ /comment }}
- {{ label }}

${{author_name}}$

{{{comment_expanded}}}

{{label}}

{{#is_bookmark}}ãƒªã‚¹ãƒˆ{{/is_bookmark}}{{^is_bookmark}}ãƒªãƒ³ã‚¯{{/is_bookmark}}

ç¬¬12å›žã€€POEï¼šã€ŒPerlèŒãˆï½žã€ã®ç•¥ã§ã¯ãªã | gihyo.jp
ã‚ã åã®å¤šã•ã¯äººæ°—ã®è¨¼æ˜Žï¼Ÿ POEã¨ã„ã†åå‰ã«ã¯ã‚ãã‚Œã‚‹ã»ã©å¤šãã®å¯“æ„ãŒã“ã˜ã¤ã‘ã‚‰ã‚Œã¦ã„ã¾ã™ã€‚ã‚‚ã¨ã‚‚ã¨ã¯Perl Object Environmentã€ŒPerlã®ã‚ªãƒ–ã‚¸ã‚§ã‚¯ãƒˆç’°å¢ƒã€ã®é æ–‡å—ã‚’ä¸¦ã¹ãŸã‚‚ã®ã§ã™ãŒã€POEã®å…¬å¼ã‚µã‚¤ãƒˆã‚’è¦‹ã¦ã¿ã‚‹ã¨ã€Edgar Allan POEã€Œã‚¨ãƒ‰ã‚¬ãƒ¼ãƒ»ã‚¢ãƒ©ãƒ³ãƒ»ãƒãƒ¼ã€ã«å§‹ã¾ã‚Šï¼ˆãã†ã€POEã¯ã€Œãƒã‚¨ã€ã§ã¯ãªãã€Œãƒãƒ¼ã€ï¼ˆâ ãªã„ã—ã€Œãƒã‚¥â ã€â ï¼‰ã¨èªã¿ã¾ã™â ï¼‰â ã€Parallel Object Executorã€Œã‚ªãƒ–ã‚¸ã‚§ã‚¯ãƒˆã®ä¸¦åˆ—å‡¦ç†æ©Ÿâ ã€â ã€Pathetically Over-Engineeredã€Œæ¶™ãŒã¡ã‚‡ã¡ã‚‡åˆ‡ã‚Œã‚‹ã»ã©ä½œã‚Šè¾¼ã¿ã™ãŽãŸâ ã€â ã€Perl Obfuscation Engineã€ŒPerlé›£èªåŒ–ã‚¨ãƒ³ã‚¸ãƒ³â ã€â ã€Perl Objects for Eventsã€Œã‚¤ãƒ™ãƒ³ãƒˆç”¨Perlã‚ªãƒ–ã‚¸ã‚§ã‚¯ãƒˆâ ã€â ã€Persistent Object Environmentã€Œæ°¸ç¶šã‚ª
monjudoh 2009/07/27
Perl

POE
ãƒªãƒ³ã‚¯
Blog Developer's Cookbook : Weblogs.com Ping Gateway to ã¯ã¦ãªã‚¢ãƒ³ãƒ†ãƒŠ (POEç‰ˆ)
Weblogs.com Ping Gateway to ã¯ã¦ãªã‚¢ãƒ³ãƒ†ãƒŠ (POEç‰ˆ) å‰å›žç´¹ä»‹ã—ãŸã€ã¯ã¦ãªã‚¢ãƒ³ãƒ†ãƒŠ Ping ã‚²ãƒ¼ãƒˆã‚¦ã‚§ã‚¤ã«ã¯ã€1ç‚¹å•é¡ŒãŒã‚ã‚Šã¾ã—ãŸã€‚Ping ã‚’å—ã‘å–ã£ãŸå¾Œã€HTTPãƒªã‚¯ã‚¨ã‚¹ãƒˆã‚’ç™ºè¡Œã—ã¦ãƒ¬ã‚¹ãƒãƒ³ã‚¹ã‚’å¾…ã£ã¦ã„ã‚‹ãŸã‚ã€Ping å—ä¿¡ã«éžå¸¸ã«æ™‚é–“ãŒã‹ã‹ã‚‹ã“ã¨ãŒã‚ã‚‹ã¨ã„ã†ç‚¹ã§ã™ã€‚ã“ã“ã«æ™‚é–“ãŒã‹ã‹ã‚‹ã¨ã€Blog ãƒ„ãƒ¼ãƒ«ã®ã‚¨ãƒ³ãƒˆãƒªãƒ“ãƒ«ãƒ‰å‡¦ç†ãŒå¾…ãŸã•ã‚Œã‚‹ã“ã¨ã«ãªã‚Šã€å¥½ã¾ã—ãã‚ã‚Šã¾ã›ã‚“ã€‚Ping ã‚’å—ã‘ã¨ã£ãŸã‚‰å³åº§ã«ãƒ¬ã‚¹ãƒãƒ³ã‚¹ã‚’è¿”ã—ã€éžåŒæœŸã«ã‚¢ãƒ³ãƒ†ãƒŠã¸ã®ãƒªã‚¯ã‚¨ã‚¹ãƒˆã‚’æŠ•ã’ã‚‹æ–¹ãŒã‚ˆã„ã§ã—ã‚‡ã†ã€‚ ä»Šå›žã®ãƒ¬ã‚·ãƒ”ã§ã¯ã€POE ã¨å‘¼ã°ã‚Œã‚‹ãƒ•ãƒ¬ãƒ¼ãƒ ãƒ¯ãƒ¼ã‚¯ã‚’ä½¿ç”¨ã—ã¦ã€ã“ã®å‡¦ç†ã®éžåŒæœŸåŒ–ã‚’è¡Œã£ã¦ã¿ã¾ã™ã€‚ Perl ã®éžåŒæœŸå‡¦ç† ä¸€èˆ¬ã«ã€å¤–éƒ¨ã¸ã®ãƒãƒƒãƒˆãƒ¯ãƒ¼ã‚¯æŽ¥ç¶š(ã“ã®å ´åˆã¯ã€ã¯ã¦ãªã‚¢ãƒ³ãƒ†ãƒŠã¸ã®HTTPæŽ¥ç¶š)ãªã©ã«ã‚ˆã‚‹ãƒ–ãƒãƒƒã‚ãƒ³ã‚°(*1)ã‚’é¿ã‘ã‚‹ãŸã‚ã«ã¯ã€ä¸€é€£ã®å‡¦ç†ã‚’å€‹åˆ¥ã«éžåŒæœŸã§(async
monjudoh 2008/05/08
Perl

POE
ãƒªãƒ³ã‚¯
LWP::UserAgent + POE::Filter::Line ã§è¡Œãƒ™ãƒ¼ã‚¹å‡¦ç† - naoyaã®ã¯ã¦ãªãƒ€ã‚¤ã‚¢ãƒªãƒ¼
#!/usr/bin/env perl use strict; use warnings; use LWP::UserAgent; use POE::Filter::Line; my $filter = POE::Filter::Line->new; my $ua = LWP::UserAgent->new; ## POE::Filter::Line ã§ $chunk ã‚’è¡Œå…¥åŠ›ã«å¤‰æ› $ua->get( 'http://d.hatena.ne.jp/naoya/', ':content_cb' => sub { my $chunk = shift; my $lines = $filter->get([ $chunk ]); for (@$lines) { print "got: $_\n"; } } ); POE::Filter ã¯å˜ç‹¬ã§ä½¿ã†ã“ã¨ãŒã§ãã¾ã™ã€‚LWP ã®ã‚³ãƒ¼ãƒ«ãƒãƒƒã‚¯ã¨çµ„ã¿åˆã‚
monjudoh 2008/05/08
Perl

POE

LWP
ãƒªãƒ³ã‚¯
Programming POE Matt Sergeant Slides at http://axkit.org/docs/presentations/tpc2002/ What Is POE? <purl> poe is a framework for multitasking and networking in plain Perl. See: http://poe.perl.org/ or a musician (http://p-o-e.com/) or the guy who draws (n
Programming POE Matt Sergeant Slides at http://axkit.org/docs/presentations/tpc2002/ What Is POE? <purl> poe is a framework for multitasking and networking in plain Perl. See: http://poe.perl.org/ or a musician (http://p-o-e.com/) or the guy who draws (not always work-safe) http://exploitationnow.com/ Multitasking + Networking q Events x Event Generators x Event Handlers x Event Queue x Event Loo
monjudoh 2008/05/07
Perl

POE

ãƒãƒ¥ãƒ¼ãƒˆãƒªã‚¢ãƒ«
ãƒªãƒ³ã‚¯
POE: Cookbook
POE's Cookbook is a collection of illustrative examples for doing things (wonderful and mundane) with POE. It was started in the spirit of the [Perl Cookbook]. This cookbook is meant to be comprehensive, but it can't be without your help. Please add suggestions to the end, or feel free to create your own examples. If you wrote a component you'd like to see here, add an example. Unless otherwise st
monjudoh 2008/05/02
Perl

POE

è³‡æ–™
ãƒªãƒ³ã‚¯
POE ãŠã¼ãˆãŒã - daily dayflower
TIMTOWTDI ãªã“ã¨ãŒã„ã£ã±ã„ã§ POE ã®ã“ã¨ãŒã‚ˆãã‚ã‹ã‚‰ãªã‹ã£ãŸã®ã§ã™ãŒï¼ŒCookbook ã¨ãƒªãƒ•ã‚¡ãƒ¬ãƒ³ã‚¹ã‚’èªã‚“ã§ãªã‚“ã¨ãªãã‚ã‹ã£ã¦ãã¾ã—ãŸã€‚ POE::Kernel ãŒ POE ã‚·ã‚¹ãƒ†ãƒ ã®ã‚³ã‚¢ã§å”¯ä¸€ç¥ž POE::Kernel->run()*1 ã‚’å®Ÿè¡Œã™ã‚‹ã¨ã‚¤ãƒ™ãƒ³ãƒˆãƒ«ãƒ¼ãƒ—ãŒå›žã‚Šå‡ºã™ ã‚¤ãƒ™ãƒ³ãƒˆãƒ«ãƒ¼ãƒ—ã§ã‚„ã‚‹ã“ã¨ãŒãªããªã‚‹ã¨ POE::Kernel->run() ã‹ã‚‰æˆ»ã‚‹ï¼ˆæˆ»ã‚‹ã“ã¨ã‚’æœŸå¾…ã—ã¦ã¯ã„ã‘ãªã„ï¼‰ POE::Session ãŒ POE ã‚·ã‚¹ãƒ†ãƒ ã«ãŠã‘ã‚‹ï¼Œã‚¿ã‚¹ã‚¯/ã‚¹ãƒ†ãƒ¼ãƒˆãƒžã‚·ãƒ³/ãƒ—ãƒã‚»ã‚¹/ã‚¹ãƒ¬ãƒƒãƒ‰çš„ãªã‚‚ã®ã®å˜ä½ è¤‡æ•°ç”Ÿæˆã—ã¦ã‚ˆã„ ã‚»ãƒƒã‚·ãƒ§ãƒ³ã®æœ€åˆã« _start ã‚¤ãƒ™ãƒ³ãƒˆãŒç™ºç”Ÿã™ã‚‹ ã‚»ãƒƒã‚·ãƒ§ãƒ³ã®æœ€å¾Œã« _end ã‚¤ãƒ™ãƒ³ãƒˆãŒç™ºç”Ÿã™ã‚‹ ã‚¤ãƒ™ãƒ³ãƒˆãƒãƒ³ãƒ‰ãƒ©ã¨ã—ã¦ï¼Œã‚µãƒ–ãƒ«ãƒ¼ãƒãƒ³ãƒªãƒ•ã‚¡ãƒ¬ãƒ³ã‚¹ï¼ˆinline_statesï¼‰ï¼Œãƒ‘ãƒƒã‚±ãƒ¼ã‚¸é–¢æ•°ï¼ˆpackage_statesï¼‰ï¼Œã‚ªãƒ–ã‚¸ã‚§ã‚¯ãƒˆãƒ¡ã‚½ãƒƒãƒ‰ï¼ˆo
monjudoh 2008/05/02
Perl

POE

ãƒãƒ¥ãƒ¼ãƒˆãƒªã‚¢ãƒ«
ãƒªãƒ³ã‚¯
POE - multitasking and networking framework for perl - perldoc.jp
åå‰Â¶ POE - multitasking and networking framework for perl POE - ãƒžãƒ«ãƒã‚¿ã‚¹ã‚¯åŠã³ãƒãƒƒãƒˆãƒ¯ãƒ¼ã‚¯ã®perlç”¨ãƒ•ãƒ¬ãƒ¼ãƒ ãƒ¯ãƒ¼ã‚¯ æ¦‚è¦Â¶ #!/usr/bin/perl -w use strict; # POEã‚’ä½¿ã†! use POE; sub handler_start { my ($kernel, $heap, $session) = @_[KERNEL, HEAP, SESSION]; print "Session ", $session->ID, " has started.\n"; $heap->{count} = 0; $kernel->yield('increment'); } sub handler_increment { my ($kernel, $heap, $session) = @_[KERNEL, HEAP, S
monjudoh 2008/05/02
Perl

POE
ãƒªãƒ³ã‚¯
1