[B! perl] fn7ã®ãƒ–ãƒƒã‚¯ãƒžãƒ¼ã‚¯

fn7 id:fn7

perlã«é–¢ã™ã‚‹fn7ã®ãƒ–ãƒƒã‚¯ãƒžãƒ¼ã‚¯ (74)

${{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}}

Reactive Programmingã®æ³¢ãŒPerlã«ã‚‚ã‚„ã£ã¦ããŸï¼Ÿ â€“ Wyton
ã©ãƒ¼ã‚‚ã€ã‚ã„ã¨ã‚“ã§ã™ã€‚ é…ã¾ããªãŒã‚‰ã€æ–°å¹´ãŠã‚ã§ã¨ã†ã”ã–ã„ã¾ã™ã€‚ ã•ã¦ã€‚è¿‘é ƒã€å€‹äººçš„ã«æ°—ã«ãªã£ã¦ã„ã‚‹CPANãƒ¢ã‚¸ãƒ¥ãƒ¼ãƒ«ã®ä¸€ã¤ã«MoobXã¨ã„ã†ã‚‚ã®ãŒã‚ã‚Šã¾ã™ã€‚ ä»Šå›žã¯å®Ÿéš›ã«MoobXã‚’ä½¿ã£ã¦ã€Perlã§ã®Reactive Programmingã‚’è©¦ã—ã¦ã¿ã¾ã—ãŸã®ã§ã€ã”ç´¹ä»‹ã—ãŸã„ã¨æ€ã„ã¾ã™ã€‚ MoobXã«ã¤ã„ã¦ MoobXã¯Reactive programming frameworkã‚’æ¨™æ¦œã—ã¦ãŠã‚Šã€Javascriptã®MobXã«ã‚¤ãƒ³ã‚¹ãƒ‘ã‚¤ã‚¢ã•ã‚ŒãŸã‚‚ã®ã§ã‚ã‚‹ã‚ˆã†ã§ã™ã€‚ æœ¬ã‚¨ãƒ³ãƒˆãƒªåŸ·ç†æ™‚ç‚¹ã§ã®æœ€æ–°ãƒãƒ¼ã‚¸ãƒ§ãƒ³ã¯0.1.0ã§ã™ãŒã€ä½œè€…ã®Yanick Champouxæ°ã«ã‚ˆã£ã¦ç²¾åŠ›çš„ã«é–‹ç™ºãŒç¶™ç¶šã•ã‚Œã¦ãŠã‚Šã€ç¾åœ¨ã‚‚3ã¤ã®issueãŒopenã¨ãªã£ã¦ã„ã¾ã™ã€‚ ãªãŠã€æœ€åˆã®ãƒªãƒªãƒ¼ã‚¹ã§ã‚ã‚‹0.0.1ãŒä»Šå¹´ã®1/13ã«ãƒªãƒªãƒ¼ã‚¹ã•ã‚ŒãŸã°ã‹ã‚Šã§ã‚ã‚Šã€0.1.0ã®ãƒªãƒªãƒ¼ã‚¹æ—¥ã‚‚1/14ã§ã‚ã‚‹ã“ã¨ã‹ã‚‰ã€ä»Šå¾Œã¾ã ã¾ã ä»•æ§˜
fn7 2017/02/09
ã¾ã˜ã‹ï¼

perl

reactiveprogramming
ãƒªãƒ³ã‚¯
Email::MIME::MobileJPã§æ–‡å—ã‚³ãƒ¼ãƒ‰ã¾ã‚ã‚Šã«æ°—ã‚’ã¤ã‹ã‚ãªã„ã§ãƒ¡ãƒ¼ãƒ«ã®é€å—ä¿¡ã‚’ãŠã“ãªã† - Articles Advent Calendar 2010 Hacker
ãƒ¡ãƒ¼ãƒ«é–¢ä¿‚ã®ãƒ¢ã‚¸ãƒ¥ãƒ¼ãƒ«ã‚’ã¨ã‚Šã¾ã¨ã‚ã¦ã€ã‚«ã‚¸ãƒ¥ã‚¢ãƒ«ã«ã¤ã‹ãˆã‚‹ã‚ˆã†ã«ã™ã‚‹ãŸã‚ã®ãƒ¢ã‚¸ãƒ¥ãƒ¼ãƒ«ã‚’ã‹ã„ã¦ã¿ã¾ã—ãŸã€‚ ãƒ¡ãƒ¼ãƒ«ã®å—ä¿¡(Parsing) ãƒ¡ãƒ¼ãƒ«ã®ãƒ‘ãƒ¼ã‚ºã¯ã€ä»¥ä¸‹ã®ã‚ˆã†ã«ã€ãƒ¡ãƒ¼ãƒ«ã®æ–‡å—åˆ—ã‚’ãã‚ã›ã¦ã‚„ã‚Œã°ã„ã„ã§ã™ã€‚ use Em ail::MIME::MobileJP::Parser; my $src_text = do { local $/; <> }; my $mail = Em ail::MIME::MobileJP::Parser->new($src_text); ãƒ¡ãƒ¼ãƒ«ã‚ªãƒ–ã‚¸ã‚§ã‚¯ãƒˆã‹ã‚‰ Subject ã‚’ãˆã‚‹ã«ã¯ä»¥ä¸‹ã®ã‚ˆã†ã«ã—ã¾ã—ã‚‡ã†ã€‚ ã“ã“ã§ã¨ã‚Œã‚‹ã‚‚ã®ã¯ MIME ãƒ˜ãƒƒãƒ€ã«ã¯ã„ã£ã¦ã„ã‚‹æƒ…å ±ã‚’ã‚‚ã¨ã«ã€UTF-8 ã« decode ã•ã‚ŒãŸæ–‡å—åˆ—ã§ã™ã€‚ å¯èƒ½ãªã‚‰ã°çµµæ–‡å—ã‚‚ decode ã—ã¾ã™ã€‚ã“ã‚Œã«ã¯ [Encode::JP::Mobile](http://search.cpan.org/p
fn7 2010/12/23
email

perl

mobile

UTF-8
ãƒªãƒ³ã‚¯
ã‚¤ãƒ³ãƒ‡ãƒƒã‚¯ã‚¹ã‚’ä½¿ã£ãŸæŒ‡å®šè¡Œå–ã‚Šå‡ºã—ãƒ—ãƒã‚°ãƒ©ãƒ (Pure Perl)
ã‚¤ãƒ³ãƒ‡ãƒƒã‚¯ã‚¹ã‚’ä½¿ã£ãŸæŒ‡å®šè¡Œå–ã‚Šå‡ºã—ãƒ—ãƒã‚°ãƒ©ãƒ (Pure Perl) 2010-08-10-1 [Programming][Algorithm] ãƒ†ã‚ã‚¹ãƒˆãƒ•ã‚¡ã‚¤ãƒ«ã‹ã‚‰æŒ‡å®šã—ãŸè¡Œã‚’å–ã‚Šå‡ºã™ã‚¿ã‚¹ã‚¯ã«ã¤ã„ã¦ã€‚ é ã‹ã‚‰èµ°æŸ»ã™ã‚‹æ–¹æ³• ã¾ãšã¯ãƒ•ã‚¡ã‚¤ãƒ«ã®é ã‹ã‚‰èµ°æŸ»ã—ã¦ã„ããƒŠã‚¤ãƒ¼ãƒ–ãªæ–¹æ³•ã€‚ â– ã‚³ãƒ¼ãƒ‰ï¼ˆgetline-naive.plï¼‰ï¼š #!/usr/bin/perl use strict; use warnings; my $qidx = shift @ARGV; # start from 0 my $tgtfn = shift @ARGV; open(my $fh, "<", $tgtfn) or die; while (<$fh>) { next if $. != $qidx + 1; print; last; } close $fh; å…ˆé è¡Œã¯0è¡Œç›®ã«ãªã‚‹ä»•æ§˜ã€‚ â– å®Ÿè¡Œä¾‹ï¼š % cat test.d
fn7 2010/08/12
programming

Perl

ãƒ•ã‚¡ã‚¤ãƒ«æ“ä½œ
ãƒªãƒ³ã‚¯
Perl 5.13.2 ãŒã‚‚ãŸã‚‰ã—ãŸ package NAMESPACE BLOCK æ§‹æ–‡ãŒã‚ãŸãˆã‚‹ã‚‚ã® - tokuhirom's blog
Perl 5.13.2 ãŒã‚‚ãŸã‚‰ã—ãŸ package NAMESPACE BLOCK æ§‹æ–‡ãŒã‚ãŸãˆã‚‹ã‚‚ã® é–‹ç™ºç‰ˆã® Perl 5.13.2 ãŒãƒªãƒªãƒ¼ã‚¹ã•ã‚ŒãŸãŒã€5.13.2 ã®ç›®çŽ‰ã¯ãªã‚“ã¨ã„ã£ã¦ã‚‚ package NAMESPACE BLOCK æ§‹æ–‡ã ã‚ã†ã€‚ use 5.13.2; use warnings; package Point { use Moose; has 'x' => (is => 'rw', isa => 'Int'); has 'y' => (is => 'rw', isa => 'Int'); __PACKAGE__->meta->make_immutable; no Moose; }; ã®ã‚ˆã†ã«ã€ãƒ‘ãƒƒã‚±ãƒ¼ã‚¸ã‚’å®£è¨€ã™ã‚‹ã“ã¨ãŒã§ãã‚‹ã‚ˆã†ã«ãªã£ãŸã€‚ ã“ã®æ§‹æ–‡ã¯éžå¸¸ã«å¤§ãã„å¤‰åŒ–ã‚’ã‚‚ãŸã‚‰ã™ã€‚ 1 ãƒ•ã‚¡ã‚¤ãƒ«ã«è¤‡æ•°ã®ã‚¯ãƒ©ã‚¹ã‚’æ›¸ãã“ã¨ãŒè‹¦ã§ãªããªã‚‹ã€‚package NAME BOC
fn7 2010/06/24
Perlã®å¤‰æ…‹çš„ãªæ›¸ãæ–¹ãŒä¸€ã¤æ¸›ã£ãŸ

perl
ãƒªãƒ³ã‚¯
Kansai.pm 10å‘¨å¹´è¨˜å¿µ Plack/PSGI å…¥é–€
The document discusses various web application frameworks and deployment methods in Perl. It covers common frameworks like CGI, mod_perl, Catalyst, and PSGI. It then discusses running PSGI applications with plackup, configuring middleware, and deploying PSGI apps behind web servers or as standalone daemons. Finally, it briefly covers application deployment and management with tools like daemontool
fn7 2010/05/02
perl

plack

psgi
ãƒªãƒ³ã‚¯
Perl 5ã¯ç”Ÿãè¿”ã£ãŸï¼ æ–°ãŸãªå‰é€²ã‚’å†é–‹ã—ãŸPerl
ã€ŒPerl 5ã‚³ã‚¢ã®é–‹ç™ºã¯ã“ã“æ•°å¹´ã€è² ã®é€£éŽ–ãŒç¶šã„ã¦ã„ãŸã€‚ãƒªãƒªãƒ¼ã‚¹ã¯æ»žã‚Šã€é–‹ç™ºè€…ã¯åŽ»ã‚Šã€å°†æ¥ã®è¦‹é€šã—ã¯ã©ã‚“ã©ã‚“æ‚ªããªã£ã¦ã„ã£ãŸã€‚ã“ã“ã§è©±ã™ã®ã¯ã€Perl 5ã®é–‹ç™ºã«ãŠã‘ã‚‹ã“ã®æ‚ªã„æµã‚ŒãŒã©ã®ã‚ˆã†ã«ã—ã¦ã€æ¥½ã—ãã€å‰å‘ãã§ã€ã‚¨ã‚ã‚µã‚¤ãƒ†ã‚£ãƒ³ã‚°ãªã‚‚ã®ã«å¤‰ã‚ã£ãŸã‹ã€ã¨ã„ã†ã‚¹ãƒˆãƒ¼ãƒªãƒ¼ã ã€ Perl 5ã®ã‚³ã‚¢ãƒ‡ãƒ™ãƒãƒƒãƒ‘ãƒ¼ã§ã€ActiveStateã®æŠ€è¡“ãƒªãƒ¼ãƒ‰ã§ã‚‚ã‚ã‚‹Jan Duboisæ°ã¯ã€4æœˆ13æ—¥ã«åŒç¤¾ã®ãƒ–ãƒã‚°ã«ãƒã‚¹ãƒˆã—ãŸã‚¨ãƒ³ãƒˆãƒªã€ŒPerl 5 is Aliveã€ã§ã€ã“ã®ã‚ˆã†ã«æ›¸ãå‡ºã—ã¦ã„ã¾ã™ã€‚ Perlã¯ã€æ©Ÿèƒ½ãŒé«˜åº¦åŒ–ã—è¤‡é›‘ã«ãªã£ãŸPerl 5ã¾ã§ã®ãƒãƒ¼ã‚¸ãƒ§ãƒ³ã‚’è¦‹ç›´ã—ã€æ–°ãŸã«ä½œã‚Šç›´ãã†ã¨ã€2000å¹´ã«Perl 6ã®é–‹ç™ºãŒå§‹ã¾ã‚Šã¾ã—ãŸã€‚ã—ã‹ã—Perl 6ã¯10å¹´ãŸã£ãŸã„ã¾ã§ã‚‚ãƒªãƒªãƒ¼ã‚¹ã•ã‚Œã¦ãŠã‚‰ãšï¼ˆä»Šæœˆã«æœ€åˆã®ãƒãƒ¼ã‚¸ãƒ§ãƒ³ãŒãƒªãƒªãƒ¼ã‚¹ã•ã‚Œã‚‹ã¨ã„ã‚ã‚Œã¦ã„ã¾ã—ãŸãŒâ€¦ï¼‰ã€ä¸€æ–¹ã§Perl 6ã®é–‹ç™ºãŒå§‹ã¾ã£ã¦ã‹ã‚‰ã¯ã€
fn7 2010/04/16
èªã¿ç‰©

perl
ãƒªãƒ³ã‚¯
local::lib ã‚’åˆ‡ã‚Šæ›¿ãˆã‚‹ - unknownplace.org
ãƒ¬ã‚¬ã‚·ãƒ¼ãªã‚¢ãƒ—ãƒªã‚’ãƒ¡ãƒ³ãƒ†ã™ã‚‹ã®ã«ãƒ¬ã‚¬ã‚·ãƒ¼ãª Perl ãƒ¢ã‚¸ãƒ¥ãƒ¼ãƒ«ãŒå¿…è¦ã«ãªã‚‹ã“ã¨ãŒã‚ã‚Šã€ãã®ãŸã‚ã«å¤ã„ã‚¢ãƒ—ãƒªç”¨ã«ã¯å°‚ç”¨ã® local::lib ãƒ‡ã‚£ãƒ¬ã‚¯ãƒˆãƒªã‚’åˆ‡ã£ã¦ã„ã‚‹ã‚ã‘ã§ã™ãŒã€æ™®æ®µã‹ã‚‰æ—¥å¸¸çš„ã« local::lib ã‚’ä½¿ç”¨ã—ã¦ã„ã‚‹ãŸã‚ shell ãŒä¸ŠãŒã£ãŸã‚¿ã‚¤ãƒŸãƒ³ã‚°ã§ã¯ãƒ‡ãƒ•ã‚©ãƒ«ãƒˆã® local::lib ç’°å¢ƒå¤‰æ•°ãŒã‚»ãƒƒãƒˆã•ã‚Œã¦ã„ã¦åˆ‡ã‚Šæ›¿ãˆãŒéžå¸¸ã«é¢å€’ã ã£ãŸã€‚ ã“ã‚Œã¾ã§ã¯ãã‚Œã»ã©é »ç¹ã«ä½¿ç”¨ã—ãªã‹ã£ãŸã®ã§æ”¾ç½®ã—ã¦ã„ãŸã®ã ãŒã€ã“ã“ã®ã¨ã“ã‚é »ç¹ã«å¿…è¦ã«ãªã‚‹ãŸã‚ã„ã„åŠ æ¸›ã†ã–ããªã£ã¦ãã¦ç°¡å˜ã« local::lib ã‚’åˆ‡ã‚Šæ›¿ãˆã‚‰ã‚Œã‚‹ã‚ˆã†è¨å®šã‚’ã—ã¦ã¿ãŸã€‚ zsh ã«æ¬¡ã®ã‚ˆã†ãªé–¢æ•°ã‚’ã¤ãã‚Šã€ãã‚Œã§ local::lib ã‚’åˆ‡ã‚Šæ›¿ãˆã‚‹ã‚ˆã†ã«ã™ã‚‹ã€‚ function locallib () { INSTALL_BASE=$1 if [ -d $INSTALL_BASE ]; then eval $(~/
fn7 2010/03/02
perl

tips

module

local-lib
ãƒªãƒ³ã‚¯
#perl bytes.pmãŒdeprecatedã«ãªã£ãŸä»¶
Perl 5.12ã‹ã‚‰bytesãƒ—ãƒ©ã‚°ãƒžãŒdeprecatedã«ãªã‚‹ã‚ˆã†ã§ã™ãŒï¼Œãã‚Œã«ã¤ã„ã¦ã®è°è«–ã‚’ã¾ã¨ã‚ã¦ã¿ã¾ã—ãŸã€‚
fn7 2010/02/23
Scalar::Util::sv_len($sv) is good enough ãªã‚‰ã—ã„ã€‚

perl

è°è«–

byte
ãƒªãƒ³ã‚¯
LLè„³ãªäººã§ã‚‚ã“ã‚Œãã‚‰ã„ã¯è¦šãˆã¦ãŠãã¨ã†ã‚Œã—ã„gdbã®ã¤ã‹ã„ã‹ãŸã€‚ã¾ãŸã¯çŒ«ã§ã‚‚ã‚ã‹ã‚‹gdbè¬›åº§ - tokuhirom's blog
LLè„³ãªäººã§ã‚‚ã“ã‚Œãã‚‰ã„ã¯è¦šãˆã¦ãŠãã¨ã†ã‚Œã—ã„gdbã®ã¤ã‹ã„ã‹ãŸã€‚ã¾ãŸã¯çŒ«ã§ã‚‚ã‚ã‹ã‚‹gdbè¬›åº§ LLã¤ã‹ã£ã¦ã¦ã‚‚ã€Œã°ã™ãˆã‚‰ãƒ¼ã«ãªã‚‹ãƒ¼ã€ã£ã¦ã„ã†çŠ¶æ³ã£ã¦ãŸã¾ã«ã‚ã‚‹ã‚ã‘ã§ã™ãŒã€LL ã—ã‹æ™®æ®µã¤ã‹ã‚ãªã„ã‚†ã¨ã‚Šã¯ã€ã“ã“ã§ãŠæ‰‹ã‚ã’ã«ãªã£ã¦ã—ã¾ã£ãŸã‚Šã™ã‚‹ã“ã¨ãŒã¾ã¾ã‚ã‚Šã¾ã™ã€‚ ã§ã€ã€Œã°ã™ãˆã‚‰ãƒ¼ã«ãªã‚‹ã‚“ã§ã™ãŒã€ã£ã¦ã¨ãã®æœ€ä½Žé™ã“ã‚Œã ã‘ã¯ã‚„ã£ã¦ã¿ãŸã‚‰ã©ã†ã‹ã€ã¨ã„ã†è©±ã€‚ã€Œãˆãƒ¼ã€ã‚ãŸã— gdb ã¨ã‹ã‚ã‹ã‚“ãªã„ã—ãƒ¼ã€ã¨ã‹ã„ã£ã¦ã‚‹äººã§ã‚‚ã“ã‚Œãã‚‰ã„ãªã‚‰ã§ãã‚‹ã‚“ã˜ã‚ƒãªã„ã‹ãªãƒ¼ã£ã¨ã€‚ perl t/00_load.tã¨ã„ã†ã‚³ãƒžãƒ³ãƒ‰ã§ segv ã™ã‚‹ã¨ã„ã†å ´åˆã€gdb ã‚’ã¤ã‹ã£ã¦ % gdb --args perl t/00_load.tã¨ã†ã¤ã€‚ ã™ã‚‹ã¨ã€ä»¥ä¸‹ã®ã‚ˆã†ã«ãƒ—ãƒãƒ³ãƒ—ãƒˆãŒã§ã‚‹ã®ã§ã€"run" ã¨ã†ã¤ã€‚ã“ã‚Œã§ã‚¹ã‚¯ãƒªãƒ—ãƒˆãŒã¯ã—ã‚Šã¯ã˜ã‚ã‚‹ã€‚ % gdb --args perl t/00_load.t GNU gdb (G
fn7 2010/02/05
perl

gdb

ãƒ‡ãƒãƒƒã‚°
ãƒªãƒ³ã‚¯
æ£è¦è¡¨ç¾åŸºç¤Žæ–‡æ³•æœ€é€Ÿãƒžã‚¹ã‚¿ãƒ¼ With Perl - å°æ± å•“ä» ãƒ’ãƒãƒ’ãƒˆå¿œæ´ãƒ–ãƒã‚° By ã¯ã¦ãª
Perlã§ã®æ£è¦è¡¨ç¾ã®ã‚µãƒ³ãƒ—ãƒ«ã¨æ–‡æ³•ä¸€è¦§ã§ã™ã€‚ ä»–ã®è¨€èªžã‚’ã‚ã‚‹ç¨‹åº¦çŸ¥ã£ã¦ã„ã‚‹äººã¯ã“ã‚Œã‚’èªã‚ã°æ£è¦è¡¨ç¾ã®åŸºç¤Žã‚’ãƒžã‚¹ã‚¿ãƒ¼ã—ã¦æ£è¦è¡¨ç¾ã‚’æ›¸ãã“ã¨ãŒã§ãã‚‹ã‚ˆã†ã«ãªã£ã¦ã„ã¾ã™ã€‚ ç°¡æ˜“ãƒªãƒ•ã‚¡ãƒ¬ãƒ³ã‚¹ã¨ã—ã¦ã‚‚å°‘ã—åˆ©ç”¨ã§ãã‚‹ã¨æ€ã„ã¾ã™ã€‚ ä»–è¨€èªžã‹ã‚‰ã®äººã¯ã€æ£è¦è¡¨ç¾ã‚’ä½¿ã†æ©Ÿä¼šãŒãªã‹ã£ãŸã‹ã‚‚ã—ã‚Œã¾ã›ã‚“ãŒï½¥ï½¥ï½¥ã€‚ Perlã§ã¯ã€æ£è¦è¡¨ç¾ã‚’ä½¿ã†ãŸã‚ã®è¨€èªžã¨è¨€ã£ã¦ã‚‚éŽè¨€ã§ã¯ã‚ã‚Šã¾ã›ã‚“ã€‚ æ£è¦è¡¨ç¾ã‚’ä½¿ã†ã“ã¨ã«ã‚ˆã‚Šãƒ†ã‚ã‚¹ãƒˆï¼ˆæ–‡å—åˆ—ï¼‰ç·¨é›†å‡¦ç†ãŒé£›èºçš„ã«æ¥½ã«ãªã‚‹ã®ã§ã™ã€‚ ã§ã¯ã€ã¾ãšã¯ã˜ã‚ã«ãƒ†ã‚¹ãƒˆãƒ‡ãƒ¼ã‚¿ã€family.txt ã‚’ç”¨æ„ã—ã¾ã™ã€‚ ã“ã®ãƒ†ã‚¹ãƒˆãƒ‡ãƒ¼ã‚¿ã‚’å…ƒã«ã—ã¦ã‚µãƒ³ãƒ—ãƒ«ãƒ—ãƒã‚°ãƒ©ãƒ ã‚’è¸ã¾ãˆã¦è§£èª¬ã‚’ã—ã¦ã„ãã¾ã™ãã€‚ ãƒ»family.txtãƒ•ã‚¡ã‚¤ãƒ«ã®å†…å®¹ macha koike yachu koike chaichan koike hiro koike mama koike papa koike koike 6 ni-bo-
fn7 2010/02/03
perl

programming

æ–‡æ³•æœ€é€Ÿãƒžã‚¹ã‚¿ãƒ¼
ãƒªãƒ³ã‚¯
XSåŸºç¤Žæ–‡æ³•æœ€é€Ÿãƒžã‚¹ã‚¿ãƒ¼ - Islands in the byte stream (legacy)
å…ƒãƒã‚¿ï¼šPerlåŸºç¤Žæ–‡æ³•æœ€é€Ÿãƒžã‚¹ã‚¿ãƒ¼(id:perlcodesample) XSã‚’å§‹ã‚ã‚‹ãŸã‚ã®æ‰‹é †ã¨ã„ãã¤ã‹ã®è¦ç´ ã®è§£èª¬ã§ã™ã€‚Cè¨€èªžã‚’ã‚ã‚‹ç¨‹åº¦çŸ¥ã£ã¦ã„ã‚‹äººã§ã‚‚ï¼Œã“ã‚Œã‚’èªã‚“ã ã ã‘ã§XSã®åŸºç¤Žã‚’ãƒžã‚¹ã‚¿ãƒ¼ã—ã¦XSã‚’æ›¸ãã“ã¨ãŒã§ãã‚‹ã‚ˆã†ã«ã¯ãªã£ã¦ã„ã¾ã›ã‚“ã€‚ãƒªãƒ•ã‚¡ãƒ¬ãƒ³ã‚¹ã§ã‚‚ã‚ã‚Šã¾ã›ã‚“ã€‚ XSã¨ã¯ï¼Œç‹ç¾©ã§ã¯Perlã§ã‚¨ã‚¯ã‚¹ãƒ†ãƒ³ã‚·ãƒ§ãƒ³ã‚’æ›¸ããŸã‚ã®ãƒžã‚¯ãƒè¨€èªžã®åå‰ã§ã™ãŒï¼Œåºƒç¾©ã§ã¯ã‚¨ã‚¯ã‚¹ãƒ†ãƒ³ã‚·ãƒ§ãƒ³ã‚’æ›¸ããŸã‚ã®æŠ€è¡“ã®ç·ç§°ã§ã™ã€‚ã“ã“ã§ã¯ï¼Œåºƒç¾©ã®XSã‚’ä¿¯çž°ã—ã¾ã™ã€‚ XSã¯ã„ã‚ã„ã‚ã¨ç‰¹æ®Šãªã®ã§ãƒ†ãƒ³ãƒ—ãƒ¬ã¯ç„¡è¦–ã§è¡Œãã¾ã™ã€‚ ç›®æ¬¡ï¼š h2xsã§ç©ºã®ãƒ‡ã‚£ã‚¹ãƒˆãƒªãƒ“ãƒ¥ãƒ¼ã‚·ãƒ§ãƒ³ã‚’ä½œã‚‹ XSãƒ•ã‚¡ã‚¤ãƒ«ã®æ§‹æˆ ã‚¹ãƒ¬ãƒƒãƒ‰ã‚³ãƒ³ãƒ†ã‚ã‚¹ãƒˆ SVãƒ•ã‚¡ãƒŸãƒª GCã¨ã‚¹ã‚³ãƒ¼ãƒ— ã•ã‚‰ãªã‚‹å¦ç¿’ã®ãŸã‚ã« h2xsã§ç©ºã®ãƒ‡ã‚£ã‚¹ãƒˆãƒªãƒ“ãƒ¥ãƒ¼ã‚·ãƒ§ãƒ³ã‚’ä½œã‚‹ ä»¥ä¸‹ã®ã‚³ãƒžãƒ³ãƒ‰ã§ç©ºã®XSãƒ‡ã‚£ã‚¹ãƒˆãƒªãƒ“ãƒ¥ãƒ¼ã‚·ãƒ§ãƒ³ã‚’ä½œã‚‹ã“ã¨ãŒã§ãã¾ã™ã€‚ h2xs -A -b 5.8.1 -n
fn7 2010/02/02
perl

æ–‡æ³•æœ€é€Ÿãƒžã‚¹ã‚¿ãƒ¼

programming
ãƒªãƒ³ã‚¯
ã‚ªã‚¹ã‚¹ãƒ¡CPANãƒ¢ã‚¸ãƒ¥ãƒ¼ãƒ«ãã®1ã€‚ AnyEvent - TokuLog æ”¹ã‚Bæ—¥è¨˜
ã‚ªã‚¹ã‚¹ãƒ¡CPANãƒ¢ã‚¸ãƒ¥ãƒ¼ãƒ«ãã®1ã€‚ AnyEvent ã¨ã„ã†ã‚ã‘ã§ã€ä¿ºã®ç‹¬æ–ã¨åè¦‹ã«ã‚ˆã‚‹ã‚ªã‚¹ã‚¹ãƒ¡ãƒ¢ã‚¸ãƒ¥ãƒ¼ãƒ«ã®ã‚³ãƒ¼ãƒŠãƒ¼ã§ã™ã€‚ AnyEvent ã¯ poll/select/kqueue/epoll(4) ãªã©ã®ã‚¤ãƒ™ãƒ³ãƒˆãƒ«ãƒ¼ãƒ—ã‚’æŠ½è±¡åŒ–ã™ã‚‹ãƒ©ã‚¤ãƒ–ãƒ©ãƒªã§ã™ã€‚ä¼¼ãŸã‚ˆã†ãªç›®çš„ã®ã‚‚ã®ã¨ã—ã¦ Danga::Socket, POE ãªã©ãŒã‚ã‚Šã¾ã™ãŒã€ãƒ©ã‚¤ãƒ–ãƒ©ãƒªå…¨ä½“ã®ã‚¤ãƒ³ã‚¿ãƒ¼ãƒ•ã‚§ãƒ¼ã‚¹ã®å®Œæˆåº¦ã‚„é€Ÿåº¦ãªã©ã®ç‚¹ã‹ã‚‰ AnyEvent ã‚’åƒ•ã¯ä¸€ç•ªæŠ¼ã—ã¦ã„ã¾ã™ã€‚ Pure Perl ã§åˆ©ç”¨ã§ãã¾ã™ã—ã€ã‚¤ãƒ³ã‚¿ãƒ¼ãƒ•ã‚§ãƒ¼ã‚¹ã‚‚å®‰å®šã—ã¦ã„ã¾ã™ã€‚ã¾ã ãƒãƒªãƒãƒªé–‹ç™ºã•ã‚Œã¦ã¾ã™ãŒã€backward incompat ãªå¤‰æ›´ã¯ã•ã‚Œãªã„ã‚ˆã†ã§ã™ã€‚ ä½œè€…ãŒ mlehmann æ°ã¨ã„ã†ã“ã¨ã§ã€ãƒ‰ã‚ãƒ¥ãƒ¡ãƒ³ãƒˆã¯ä¸å¯§ã§ã™ãŒæ”»æ’ƒçš„ãªæ–‡ç« ãŒç›®ç«‹ã¡ã¾ã™ã—ã€ãƒã‚°ãƒ¬ãƒãƒ¼ãƒˆã™ã‚‹ã¨ç•°å¸¸ãªé•·æ–‡ãŒã‹ãˆã£ã¦ããŸã‚Šã™ã‚‹ã®ã§ã†ã£ã¨ãƒ¼ã—ã‹ã£ãŸã‚Šã—ã¾ã™ãŒã€ã‚³ãƒ¼ãƒ‰ã®å“è³ªã¯ãŸã‹ã„ã®
fn7 2010/01/22
perl

AnyEvent

CPAN
ãƒªãƒ³ã‚¯
ç¬¬ï¼‘å›žã€€æ¾é‡Žå¾³å¤§æ°ã€€æ ªå¼ä¼šç¤¾ãƒ¢ãƒã‚¤ãƒ«ãƒ•ã‚¡ã‚¯ãƒˆãƒªãƒ¼ã‚¤ãƒ³ã‚¿ãƒ“ãƒ¥ãƒ¼Engineer 25
ç¬¬ï¼‘å›žã€€æ¾é‡Žå¾³å¤§æ°ã€€æ ªå¼ä¼šç¤¾ãƒ¢ãƒã‚¤ãƒ«ãƒ•ã‚¡ã‚¯ãƒˆãƒªãƒ¼ ä»Šå›žã¯ã€æ ªå¼ä¼šç¤¾ãƒ¢ãƒã‚¤ãƒ«ãƒ•ã‚¡ã‚¯ãƒˆãƒªãƒ¼ã®ã‚¨ãƒ³ã‚¸ãƒ‹ã‚¢ã§ã‚ã‚‹ã€æ¾é‡Žå¾³å¤§ï¼ˆ23æ³ï¼‰ã•ã‚“ã«ãŠè©±ã‚’ä¼ºã„ã¾ã—ãŸã€‚ æ¾é‡Žã•ã‚“ã¯ã€ãƒ¢ãƒã‚¤ãƒ«ãƒ•ã‚¡ã‚¯ãƒˆãƒªãƒ¼ç¤¾ã§ãƒ¢ãƒã‚¤ãƒ«ç³»ã®ã‚µãƒ¼ãƒ“ã‚¹é–‹ç™ºã‚’æ‰‹ãŒã‘ã‚‹å‚ã‚‰ã€ã€ŒYAPC::Asiaã€ã€ŒShibuya.pmã€ãªã©ã€Perlç³»ã®ã‚³ãƒŸãƒ¥ãƒ‹ãƒ†ã‚£ã§ã‚‚ç©æ¥µçš„ã«æ´»èºã•ã‚Œã¦ã„ã¾ã™ã€‚ ã¾ãŸã€Railsã«ã‚ˆã‚‹Wikiã§ã‚ã‚‹ã€ŒInamode6ã€ã‚„æºå¸¯ã‹ã‚‰IRï¼£ã®ãƒã‚°ã‚’è¦‹ãŸã‚Šç™ºè¨€ã™ã‚‹ãŸã‚ã®ã‚µãƒ¼ãƒãƒ¼ã€Œmobircã€ãªã©ã‚‚ç”Ÿã¿å‡ºã—ãŸã“ã¨ã§ã‚‚çŸ¥ã‚‰ã‚Œã€23æ³ã«ã—ã¦å¤©æ‰ãƒ—ãƒã‚°ãƒ©ãƒžã¨ã—ã¦åºƒãçŸ¥ã‚‰ã‚Œã¦ã„ã¾ã™ã€‚ å–æã¯äº”åç”°ã®ãƒ¢ãƒã‚¤ãƒ«ãƒ•ã‚¡ã‚¯ãƒˆãƒªãƒ¼ç¤¾ã®ä¼šè°å®¤ã§è¡Œã„ã€æ¾é‡Žã•ã‚“ã®ç›´æŽ¥ã®ã”ä¸Šå¸ã§ã‚ã‚‹æœ¨æ‘å²³æ–‡ã•ã‚“ã¨åºƒå ±æ‹…å½“ã§ã‚ã‚‹ä¸‹æ‘å‹é¦™ã•ã‚“ã«ã‚‚ã”åŒå¸ã‚’ã„ãŸã ã„ã¦ãŠã‚Šã¾ã™ã€‚â€»å–ææ—¥ã¯ã€2008å¹´1æœˆã§ã™ã€‚æ‰€å±žã‚„å½¹è·ãªã©ã¯å½“æ™‚ã®ã¾ã¾æŽ²è¼‰ã—ã¦ãŠã‚Šã¾ã™ã€‚ æŸ´ç”°ã•ã‚“ã¨ã®ã”é–¢ä¿‚ã¯ï¼Ÿ
fn7 2010/01/15
ãƒ—ãƒã‚°ãƒ©ãƒž

ä»•äº‹

é–‹ç™º

web

perl
ãƒªãƒ³ã‚¯
Use -w in applications, use warnings in modules - Islands in the byte stream (legacy)
è¦å‘Šã®ãŸã‚ã«ã¯ -w ã§ã¯ãªã use warnings ã‚’ä½¿ã†ã¹ãï¼Œã¨ã„ã†æ„è¦‹ãŒã‚ã‚‹*1ã€‚ perl - use warnings; # -w ã§ãªãã¦ - 404 Blog Not Found ç¾ä»£çš„ãªPerlã®è¨˜è¿°æ–¹æ³•ä¸€è¦§ + Î± - Perlå…¥é–€ã€œã‚µãƒ³ãƒ—ãƒ«ã‚³ãƒ¼ãƒ‰ã«ã‚ˆã‚‹Perlå…¥é–€ã€œ ã—ã‹ã—ãã‚Œã¯ã‚ã‚‹æ„å‘³ã§ã¯æ£è§£ã ãŒï¼Œã‚ã‚‹æ„å‘³ã§ã¯é–“é•ã„ã§ã‚ã‚‹ã€‚æ£ã—ãã¯ã€Œã‚¢ãƒ—ãƒªã‚±ãƒ¼ã‚·ãƒ§ãƒ³ã§ã¯ #!è¡Œã«-wã¨æ›¸ãï¼Œãƒ¢ã‚¸ãƒ¥ãƒ¼ãƒ«ã§ã¯use warningsã‚’ä½¿ã†ã€ã§ã‚ã‚‹ã€‚ ä»¥ä¸‹ã®ã‚³ãƒ¼ãƒ‰ã§ã¯ãã‚Œã‚’ç¤ºã™ã€‚ (1) $ perl -MFile::Spec -E 'say File::Spec->join("foo", undef)' foo/ $ (2) $ perl -MFile::Spec -wE 'say File::Spec->join("foo", undef)' Use of uninitialize
fn7 2009/11/06
å…¥é–€

perl
ãƒªãƒ³ã‚¯
YAPC::Asia2009ã®ç‰¹åˆ¥ç ”ä¿®ã€ŒMooseå…¥é–€ã€ãƒ¢ãƒ€ãƒ¼ãƒ³ãªã‚ªãƒ–ã‚¸ã‚§ã‚¯ãƒˆæŒ‡å‘ã‚·ã‚¹ãƒ†ãƒ ã€ãŒè¶…è‰¯ã‹ã£ãŸï¼ - ã“ã‚“ã«ã¡ã¯ã“ã‚“ã«ã¡ã¯monmonã§ã™ï¼
Shawn Moore(Sartak)ã®è¬›ç¾©ã§ã—ãŸã€‚åŒæ™‚é€šè¨³ã€‚ æ„Ÿæƒ³ã€‚ è¶…æ¥½ã—ã‹ã£ãŸï¼ï¼sartakãŒã¨ã¦ã‚‚ã„ã„äººã ã£ãŸï¼ã¡ã‚‡ã£ã¨ã—ãŸè³ªå•ã§ã‚‚ã‚³ãƒ¼ãƒ‰æ›¸ããªãŒã‚‰æ•™ãˆã¦ãã‚ŒãŸã€‚ ã‚‚ã£ã¨ã¿ã‚“ãªå—ã‘ãŸã‚‰ã„ã„ã®ã«ï¼ã‚‚ã†çµ‚ã‚ã£ã¡ã‚ƒã£ãŸã‘ã©ï¼ æ©Ÿèƒ½æ¯Žã«ã€è¬›ç¾©â†’å®Ÿç¿’â†’è¬›ç¾©â†’å®Ÿç¿’ã€ã®ç¹°ã‚Šè¿”ã—ã€‚ ã“ã‚ŒãŒã¨ã¦ã‚‚æ¥½ã—ã‹ã£ãŸã€‚ 1æ—¥æœ€å¾Œã¾ã§æ¥½ã—ãã‚³ãƒ¼ãƒ‰æ›¸ã„ã¦éŽã”ã›ãŸã€‚ å®Ÿç¿’ã®å†…å®¹ã‚‚ã€æ—¢ã«ã‚ã‚‹ãƒ†ã‚¹ãƒˆãŒé€šã‚‹ã‚ˆã†ã«ãƒ¢ã‚¸ãƒ¥ãƒ¼ãƒ«ã‚’ä½œæˆã—ã¦ãƒ†ã‚¹ãƒˆãŒé€šã£ãŸã‚‰ã€Œã‚„ã£ãŸãƒ¼ï¼ã€ã¿ãŸã„ãªã€‚ gitã«è³‡æ–™ãŒã‚ã‚‹ã®ã§ã¿ã‚“ãªè½ã¨ã—ã¦ã‚„ã£ãŸã‚‰ã„ã„ã‚ˆï¼ccã®ãƒ©ã‚¤ã‚»ãƒ³ã‚¹ã§å…¬é–‹ã—ã¦ã‚‹ã®ã§ã€‚ ãã£ã¨testãƒ•ã‚¡ã‚¤ãƒ«è‡ªä½“ã‚‚ã‚ãƒ¬ã‚¤ã«æ›¸ã„ã¦ã‚ã‚‹ã¯ãšã ã‹ã‚‰è¦‹ãŸã‚‰ã„ã„ã¨æ€ã†ã‚ˆ JPAã«ã™ã”ã„æ„Ÿè¬ã§ã—ãŸã€‚3æ—¥é–“å…¨éƒ¨å—ã‘ã¦ãŠã‘ã°è‰¯ã‹ã£ãŸã¨æ€ã£ãŸã€‚ ä»¥ä¸‹ãƒ¡ãƒ¢ã€‚ Part0: Mooseã®ã‚³ãƒ³ã‚»ãƒ—ãƒˆ perl6ã‹ã‚‰ã„ã‚ã‚“ãªã‚¢ã‚¤ãƒ‡ã‚£ã‚¢ã‚’ã‚‚ã‚‰ã£ã¦ã‚‹ ã¾ãšã¯ã–ã£ãã‚ŠMoose
fn7 2009/09/16
perl

moose

yapcasia2009

ãƒ—ãƒã‚°ãƒ©ãƒŸãƒ³ã‚°
ãƒªãƒ³ã‚¯
Moose::Manual Moose(0.79) - Japan Perl Association ãƒ‰ã‚ãƒ¥ãƒ¡ãƒ³ãƒˆå’Œè¨³ãƒ—ãƒã‚¸ã‚§ã‚¯ãƒˆ
Mooseã¯ã€Perl 5ã®ãŸã‚ã«æ›¸ã‹ã‚ŒãŸã€Œå®Œå…¨ãªã€ã‚ªãƒ–ã‚¸ã‚§ã‚¯ãƒˆã‚·ã‚¹ãƒ†ãƒ ã§ã™ã€‚ç¾ä»£çš„ãªã‚ªãƒ–ã‚¸ã‚§ã‚¯ãƒˆæŒ‡å‘è¨€èªžã‚’ãªã«ã‹ã²ã¨ã¤æ€ã„æµ®ã‹ã¹ã¦ã¿ã¦ãã ã•ã„(Perl 5ã¯æ±ºã—ã¦ç¾ä»£çš„ãªã‚ªãƒ–ã‚¸ã‚§ã‚¯ãƒˆæŒ‡å‘è¨€èªžã§ã¯ã‚ã‚Šã¾ã›ã‚“)ã€‚ã‚¢ãƒˆãƒªãƒ“ãƒ¥ãƒ¼ãƒˆã‚’å®£è¨€ã—ãŸã‚Šã€ã‚ªãƒ–ã‚¸ã‚§ã‚¯ãƒˆã‚’æ§‹ç¯‰ã—ãŸã‚Šã€ç¶™æ‰¿ã‚’è¡Œã£ãŸã‚Šã€ã‚ã‚‹ã„ã¯ã‚‚ã£ã¨ã„ã‚ã„ã‚ã§ãã‚‹ã‹ã‚‚ã—ã‚Œã¾ã›ã‚“ãŒã€ãã®ã‚ˆã†ãªä½œæ¥ã®ãŸã‚ã®ã‚ãƒ¼ãƒ¯ãƒ¼ãƒ‰ãŒç”¨æ„ã•ã‚Œã¦ã„ã¾ã™ã—ã€ãã®å®Ÿè£…ãŒã©ã†ãªã£ã¦ã„ã‚‹ã‹ãªã‚“ã¦ã ã‚Œã‚‚æ°—ã«ã¨ã‚ã¾ã›ã‚“ã€‚ MooseãŒç›®æŒ‡ã™ã¨ã“ã‚ã‚‚åŒã˜ã§ã™ã€‚æœ¬å½“ã«æ–°ã—ã„ã‚ãƒ¼ãƒ¯ãƒ¼ãƒ‰ã‚’ä½œã‚‹ã“ã¨ã¯ã§ãã¾ã›ã‚“ãŒã€Mooseã¯ãã‚Œã¨ã‚ˆãä¼¼ãŸã€Œã‚·ãƒ¥ã‚¬ãƒ¼ã€ã‚’æä¾›ã—ã¦ã„ã¾ã™ã—ã€ãªã«ã‚ˆã‚Šã€Mooseã‚’ä½¿ã†ã¨ã€Œã‚¯ãƒ©ã‚¹ã‚’å®£è¨€çš„ã«å®šç¾©ã§ãã‚‹ã€ã‚ˆã†ã«ãªã‚Šã¾ã™ã€‚ãƒ–ãƒ¬ã‚¹ã•ã‚ŒãŸãƒãƒƒã‚·ãƒ¥ãƒªãƒ•ã‚¡ãƒ¬ãƒ³ã‚¹ã‚„ã‚¢ã‚¯ã‚»ã‚µãƒ¡ã‚½ãƒƒãƒ‰ãªã©ã¯ã‚‚ã†æ°—ã«ã—ãªãã¦ã‚‚ã‚ˆããªã‚‹ã®ã§ã™ã€‚ ã¾ãŸã€Mooseã‚’ä½¿ãˆã°ã‚¯ãƒ©ã‚¹ã®ã€Œè«–ç†çš„ãªã€æ§‹é€ ã ã‘ã‚’
fn7 2009/09/16
ãƒ—ãƒã‚°ãƒ©ãƒŸãƒ³ã‚°

development

perl

ã“ã‚Œã¯ä¾¿åˆ©

ã“ã‚Œã¯ã™ã”ã„
ãƒªãƒ³ã‚¯
Big Sky :: è¨³ï¼šInstalling Perl modules without root access
by Jon Allen (JJ) - posted on Wednesday, 26 August 2009 ã“ã“2ã€3å¹´ã«ã‚ãŸã£ã¦ã€Perlã§ã®é–‹ç™ºã¯Catalystã‚„DBIx::Classã€Mooseç‰ã®ã‚¨ã‚ã‚µã‚¤ãƒ†ã‚£ãƒ³ã‚°ãªæ–°æŠ€è¡“ã«ã‚ˆã‚Šå¤‰ã‚ã£ã¦ã¾ã—ãŸã€‚ ã—ã‹ã—ãªãŒã‚‰ã€ã“ã‚Œã‚‰ã‚„ä»–ã®ãƒ„ãƒ¼ãƒ«ã«å…±é€šã—ã¦è¨€ãˆã‚‹äº‹ãŒ1ã¤ã‚ã‚Šã¾ã™ - ãã‚Œã‚‰ã¯ã“ã‚Œã‚‰ãŒPerl æœ¬ä½“ã®é…å¸ƒç‰©ã§ã¯ãªãCPANã®ä¸€éƒ¨ã¨ã„ã†äº‹ã§ã™ã€‚å…±æœ‰ãƒ›ã‚¹ãƒ†ã‚£ãƒ³ã‚°ã‚µãƒ¼ãƒãªã©ä¿¡é ¼ã•ã‚Œã¦ã„ã‚‹ç’°å¢ƒã«ãŠã„ã¦ã¯ã€ãƒ¦ãƒ¼ã‚¶ã¯ãƒ«ãƒ¼ãƒˆæ¨©é™ãªã—ã§CPANãƒ¢ã‚¸ãƒ¥ãƒ¼ãƒ«ã‚’ã‚·ã‚¹ãƒ†ãƒ ã«ã‚¤ãƒ³ã‚¹ãƒˆãƒ¼ãƒ«ã™ã‚‹äº‹ãŒé›£ã—ã„ã§ã—ã‚‡ã†ã€‚ ãŸã å¹¸ã„ã€å˜ç´”è§£ãŒã‚ã‚Šã¾ã™ - ãã‚ŒãŒ local::lib ã§ã™ã€‚ local::lib ã®ç´¹ä»‹ local::lib ã¯ CPAN ãƒ‡ã‚£ã‚¹ãƒˆãƒªãƒ“ãƒ¥ãƒ¼ã‚·ãƒ§ãƒ³ã‚’ãƒ›ãƒ¼ãƒ ãƒ‡ã‚£ãƒ¬ã‚¯ãƒˆãƒªã«ã«ã‚¤ãƒ³ã‚¹ãƒˆãƒ¼ãƒ«ã§ãã‚‹æ§˜ã«ã‚ã‚‰ã‚†ã‚‹è¨å®šã‚’è¡Œã†Perlãƒ¢ã‚¸ãƒ¥ãƒ¼ãƒ«ã§ã™ã€‚ã“ã‚Œã¯
fn7 2009/08/27
perl

CPAN

module
ãƒªãƒ³ã‚¯
XML::LibXMLã§HTMLæ–‡æ›¸ã‚’æ‰±ã† - å¾’æ›¸
XML::LibXMLå¤§å¥½ããªè€…ãŒä»¥ä¸‹è¿°ã¹ã¦ã¿ã¾ã™ã€‚ ã—ã‹ã—ã€XML::Liberalã‚’é™¤ã‘ã°ã€XML::*ãªãƒ¢ã‚¸ãƒ¥ãƒ¼ãƒ«ã¯XæŠœãã®HTMLã‚’é£Ÿã£ã¦ãã‚Œãªã„.... ã¨ã€404 Blog Not Found:perl - HTMLã‚’XMLã¨ã—ã¦æ‰±ã†ã§æ›¸ã‹ã‚Œã¦ã„ãŸã®ã§ã™ãŒã€XML::LibXMLã€ã¨ã„ã†ã‹ãã®åŸºã¨ãªã‚‹Cãƒ©ã‚¤ãƒ–ãƒ©ãƒªlibxml2ã¯HTMLãƒ‘ãƒ¼ã‚µã‚‚å‚™ãˆã¦ã„ã‚‹ã®ã§ã€ç›´ã«HTMLã‚’æ‰±ã†ã“ã¨ã‚‚ã§ãã¾ã™ã€‚ ãŸã å…ƒãŒXMLãƒ‘ãƒ¼ã‚µãªã ã‘ã«ã€å°‘ã—ã§ã‚‚HTMLæ–‡æ›¸ã«å£Šã‚ŒãŸéƒ¨åˆ†ãŒã‚ã‚‹ã¨è§£æžã‚¨ãƒ©ãƒ¼ã‚’èµ·ã“ã—ã¦åœæ¢ã—ã¦ã—ã¾ã„ã¾ã™ãŒã€å¹¸ã„ãªã“ã¨ã«ãã®ã‚¨ãƒ©ãƒ¼ã‹ã‚‰å›žå¾©ã™ã‚‹ãƒ¢ãƒ¼ãƒ‰ã‚‚å‚™ãˆã¦ã„ã¾ã™ã€‚ä»¥ä¸‹ã‚µãƒ³ãƒ—ãƒ«ã‚’ã€‚ use strict; use warnings; use XML::LibXML; my $parser = XML::LibXML->new(); $parser->recover_silently(
fn7 2009/08/05
perl

libxml2

html
ãƒªãƒ³ã‚¯
OpenID OAuth Extension ã«ã¤ã„ã¦ä»ŠåŒ—ç”£æ¥ã«ç”ãˆã‚‹ - çŸ¥ã‚‰ãªã„ã‘ã©ãã£ã¨ãã†ã€‚
OpenIDã®æ‹¡å¼µã§ OAuthã®èªå¯æ¸ˆã¿ã®request tokenã‚’ ã‚‚ã‚‰ã† ãƒªã‚¯ã‚¨ã‚¹ãƒˆã«å«ã‚ã‚‹å†…å®¹ã¯ namespaceã¯ http://specs.openid.net/extensions/oauth/1.0 äº‹å‰ã«ç™»éŒ²æ¸ˆã¿ã®consumer key èªå¯ã‚’å¾—ã‚ˆã†ã¨ã—ã¦ã„ã‚‹scope ãã†ã™ã‚‹ã¨request tokenãŒè¿”ã£ã¦ãã‚‹ã®ã§access tokenã¨äº¤æ›ã—ã¾ã™ é€šå¸¸ã®OAuthã®ãƒ•ãƒãƒ¼ã ã¨ã“ã“ã§request token secretãŒå¿…è¦ã§ã™ãŒã€ç©ºæ–‡å—åˆ—ã§OKã§ã™ ãŸã ãã‚Œã ã‘ã€ã‚ã¨ã¯æ™®é€šã®OAuthã¨åŒã˜ perlã§ã„ã†ã¨ extensionã‚’è¨å®šã—ã¦èªè¨¼è¦æ±‚ my $openid_csr = Net::OpenID::Consumer->new(...); my $cident = $openid_csr->claimed_identity('http://ww
fn7 2009/08/04
oauth

perl
ãƒªãƒ³ã‚¯
ã¯ã¦ãªã‚°ãƒ«ãƒ¼ãƒ—ã®çµ‚äº†æ—¥ã‚’2020å¹´1æœˆ31æ—¥(é‡‘)ã«æ±ºå®šã—ã¾ã—ãŸ - ã¯ã¦ãªã®å‘ŠçŸ¥
ã¯ã¦ãªã‚°ãƒ«ãƒ¼ãƒ—ã®çµ‚äº†æ—¥ã‚’2020å¹´1æœˆ31æ—¥(é‡‘)ã«æ±ºå®šã—ã¾ã—ãŸ ä»¥ä¸‹ã®ã‚¨ãƒ³ãƒˆãƒªã®é€šã‚Šã€ä»Šå¹´æœ«ã‚’ç›®å‡¦ã«ã¯ã¦ãªã‚°ãƒ«ãƒ¼ãƒ—ã‚’çµ‚äº†äºˆå®šã§ã‚ã‚‹æ—¨ã‚’ãŠçŸ¥ã‚‰ã›ã—ã¦ãŠã‚Šã¾ã—ãŸã€‚ 2019å¹´æœ«ã‚’ç›®å‡¦ã«ã€ã¯ã¦ãªã‚°ãƒ«ãƒ¼ãƒ—ã®æä¾›ã‚’çµ‚äº†ã™ã‚‹äºˆå®šã§ã™ - ã¯ã¦ãªã‚°ãƒ«ãƒ¼ãƒ—æ—¥è¨˜ ã“ã®ãŸã³ã€æ£å¼ã«çµ‚äº†æ—¥ã‚’æ±ºå®šã„ãŸã—ã¾ã—ãŸã®ã§ã€ä»¥ä¸‹ã®é€šã‚Šã”ç¢ºèªãã ã•ã„ã€‚ çµ‚äº†æ—¥: 2020å¹´1æœˆ31æ—¥(é‡‘) ã‚¨ã‚¯ã‚¹ãƒãƒ¼ãƒˆå¸Œæœ›ç”³è«‹æœŸé™:2020å¹´1æœˆ31æ—¥(é‡‘) çµ‚äº†æ—¥ä»¥é™ã¯ã€ã¯ã¦ãªã‚°ãƒ«ãƒ¼ãƒ—ã®é–²è¦§ãŠã‚ˆã³æŠ•ç¨¿ã¯è¡Œãˆã¾ã›ã‚“ã€‚æ—¥è¨˜ã®ã‚¨ã‚¯ã‚¹ãƒãƒ¼ãƒˆãŒå¿…è¦ãªæ–¹ã¯ä»¥ä¸‹ã®è¨˜äº‹ã«ã—ãŸãŒã£ã¦æ‰‹ç¶šãã‚’ã—ã¦ãã ã•ã„ã€‚ ã¯ã¦ãªã‚°ãƒ«ãƒ¼ãƒ—ã«æŠ•ç¨¿ã•ã‚ŒãŸæ—¥è¨˜ãƒ‡ãƒ¼ã‚¿ã®ã‚¨ã‚¯ã‚¹ãƒãƒ¼ãƒˆã«ã¤ã„ã¦ - ã¯ã¦ãªã‚°ãƒ«ãƒ¼ãƒ—æ—¥è¨˜ ã”åˆ©ç”¨ã®ã¿ãªã•ã¾ã«ã¯ã”è¿·æƒ‘ã‚’ãŠã‹ã‘ã„ãŸã—ã¾ã™ãŒã€ã©ã†ãžã‚ˆã‚ã—ããŠé¡˜ã„ã„ãŸã—ã¾ã™ã€‚ 2020-06-25 è¿½è¨˜ ã¯ã¦ãªã‚°ãƒ«ãƒ¼ãƒ—æ—¥è¨˜ã®ã‚¨ã‚¯ã‚¹ãƒãƒ¼ãƒˆãƒ‡ãƒ¼ã‚¿ã¯2020å¹´2æœˆ28
fn7 2009/05/29
database

coro

dbi

perl
ãƒªãƒ³ã‚¯
1 2 3 4 æ¬¡ã®ãƒšãƒ¼ã‚¸