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

tfukui id:tfukui

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

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

GNU ParallelãŒã™ã”ã™ãŽã¦ç”Ÿãã‚‹ã®ãŒã¤ã‚‰ã„
çš†ã•ã‚“ä»Šæ—¥ã‚‚ãŸãã•ã‚“ã®ã‚µãƒ¼ãƒã‚’ç›¸æ‰‹ã«ã•ã‚Œã¦ã„ã‚‹ã“ã¨ã‹ã¨æ€ã„ã¾ã™ãŒã€ã„ãã¤ã‹ã®ã‚µãƒ¼ãƒã«ã‚¢ã‚¯ã‚»ã‚¹ã—ã¦ 1 ç§’é–“ã®çµ±è¨ˆæƒ…å ±(ä¾‹ãˆã°vmstat 1 2)ã‚’é›†ã‚ã¦ãƒ‘ãƒƒã¨è¡¨ç¤ºã—ãŸã„æ™‚ã£ã¦ã©ã†ã‚„ã£ã¦ã¾ã™ã‹ãï¼Ÿshell script ã‚’å¦ã³ã¯ã˜ã‚ãŸã°ã£ã‹ã‚Šã®åƒ•ã¯ã“ã‚“ãªæ„Ÿã˜ã§æ›¸ã„ã¦ã¾ã—ãŸã€‚ $ for i in host1 host2 host3; do ssh $i "vmstat 1 2 | tail -1"; done 0 0 0 329004 210836 14275360 0 0 0 2424 1410 1828 0 0 100 0 0 0 0 0 3716112 587704 25921684 0 0 0 488 1643 2026 0 0 100 0 0 1 0 0 555440 265560 14015548 0 0 0 4204 1534 2392 1 0 99 0 0 vmstatã¨
tfukui 2011/04/19
perl

gnu
ãƒªãƒ³ã‚¯
#perl - utf8::decode()ã§ã¯ãªãEncode::decode_utf8()ã‚’ä½¿ã†ã¹ãç†ç”± : 404 Blog Not Found
2009å¹´09æœˆ13æ—¥13:00 ã‚«ãƒ†ã‚´ãƒªLightweight Languages #perl - utf8::decode()ã§ã¯ãªãEncode::decode_utf8()ã‚’ä½¿ã†ã¹ãç†ç”± é§„ç›®ã§ã™ã€‚ [ã‚’] Perl ã® utf8 ã¾ã‚ã‚Šã®ãŠã¾ã˜ãªã„ æœ€è¿‘è‰¯ãä½¿ã†ãŠã¾ã˜ãªã„ã€ã¨ã„ã†ã‹ã‚¤ãƒ‡ã‚£ã‚ªãƒ ã€‚ utf8::decode($text) unless utf8::is_utf8($text); ã“ã†ã„ã†å ´åˆã¯ã€Encode::decode_utf8()ã§ãªã„ã¨ã€‚ ä»¥ä¸‹ã‚’ã”ã‚‰ã‚“ãã ã•ã„ã€‚ #!/usr/bin/perl use strict; use warnings; use Encode; use Devel::Peek; for my $bytes ( "\x2F", "\xC0\xAF", "\xE0\x80\xAF", "\xF0\x80\x80\xAF" ) { my $u
tfukui 2009/09/13
perl

æ–‡å—ã‚³ãƒ¼ãƒ‰

utf8
ãƒªãƒ³ã‚¯
CPANãƒ¢ã‚¸ãƒ¥ãƒ¼ãƒ«ã‚’ã‚¹ã‚¯ãƒªãƒ—ãƒˆä¸€ç™ºã§ä¾å˜è§£æ±ºã—ã¤ã¤rpmåŒ–ã™ã‚‹ - ã¨ã‚ã‚‹ã¯ã¦ãªç¤¾å“¡ã®æ—¥è¨˜
å°‘ã—å‰ã«mizzyã•ã‚“ã« ãã†ã„ãˆã°ã€ã¾ã£ã•ã‚‰ãªã‚µãƒ¼ãƒã‚’30åˆ†ã§æœ¬ç•ªæŠ•å…¥ã§ãã‚‹ã‚ˆã†ã«ã™ã‚‹ ã§ stanaka ã•ã‚“ãŒã€ŒCPANã®ä¾å˜é–¢ä¿‚ã‚’è§£æžã—ã¦rpmåŒ–ã™ã‚‹æ‰‹è£½ã‚¹ã‚¯ãƒªãƒ—ãƒˆã§ã€CPANãƒ¢ã‚¸ãƒ¥ãƒ¼ãƒ«ã®rpmåŒ–ãŒã€ã»ã¼è‡ªå‹•åŒ–ã•ã‚Œã¦ã„ã¾ã™ã€ã¨æ›¸ã„ã¦ã‚‹ã‚“ã ã‘ã©ã€ã“ã‚Œã£ã¦å…¬é–‹ã—ã¦ãã‚Œãªã„ã®ã‹ãªãƒ¼ã€‚ HowToRpmizeCpanModules - mizzy.org - Trac ã¨çªã‹ã‚ŒãŸã®ã§ã€githubã§å…¬é–‹ã—ã¦ã¿ã¾ã™ã€‚ http://github.com/stanaka/cpan-dependency/tree/master çªã‹ã‚ŒãŸã¤ã„ã§ã«mizzyã•ã‚“ã«è»½ãå‹•ä½œç¢ºèªã—ã¦ã‚‚ã‚‰ã£ãŸã¨ã“ã‚ã€ãã‚Œãªã‚Šã«å‹•ã„ã¦ã„ã‚‹ã‚ˆã†ã§ã™ã€‚ã¾ãŸã€ã¯ã¦ãªã§ã¯ã€ã“ã®ã‚¹ã‚¯ãƒªãƒ—ãƒˆã‚’åˆ©ç”¨ã—ã¦ã€æ—¥ã€…ãã‚Œãªã‚Šã®æ•°ã®CPANãƒ¢ã‚¸ãƒ¥ãƒ¼ãƒ«ã®rpmåŒ–ã‚’è¡Œã£ã¦ã„ã¾ã™ã®ã§ã€ã ã„ãŸã„ã†ã¾ãå‹•ãã®ã§ã¯ãªã„ã‹ã¨æ€ã„ã¾ã™ã€‚ CentOSã‚„Fedor
tfukui 2009/02/19
cpan

perl

rpm
ãƒªãƒ³ã‚¯
ã€Œæ—¥æœ¬èªžãƒ†ã‚ã‚¹ãƒˆã‚’åˆ†é¡žã™ã‚‹ãƒ™ã‚¤ã‚¸ã‚¢ãƒ³ãƒ•ã‚£ãƒ«ã‚¿ã€ã‚’ç°¡å˜ã«ã¤ãã‚‹yo - download_takeshiâ€™s diary
æ•°é€±é–“å‰ã®è©±ã«ãªã‚Šã¾ã™ãŒã€ã€Œã¯ã¦ãƒ–ã®ãƒªãƒ‹ãƒ¥ãƒ¼ã‚¢ãƒ«ä¼šè¦‹ã€ã®è¨˜äº‹ã‚’èªã‚“ã§ã„ãŸã¨ã“ã‚ã€ã¯ã¦ãƒ–ã«ã‚‚ã€Œè‡ªå‹•ã‚«ãƒ†ã‚´ãƒ©ã‚¤ã‚ºã«ã‚ˆã‚‹è¨˜äº‹åˆ†é¡žã€ã®æ©Ÿèƒ½ãŒæè¼‰ã•ã‚Œã‚‹ã¨ã‹ã€‚ã€‚ã€‚ åŒã˜ã‚ˆã†ãªã‚¿ã‚¤ãƒŸãƒ³ã‚°ã§ã€Œä¼¼ãŸã‚ˆã†ãªãƒ¢ãƒŽã€ã¨ã„ã†ã‹ã€Œã»ã¼åŒã˜ã‚ˆã†ãªãƒ¢ãƒŽã€ã‚’ä½œã£ã¦ã„ãŸã®ã§ã€ã™ã”ãƒ¼ãã‚¤ãƒ³ã‚¹ãƒ‘ã‚¤ã‚¢ã•ã‚Œã¦ã—ã¾ã„ã¾ã—ãŸã€‚ã‚¸ãƒ¥ãƒ¯ã€œã€‚ï¼ˆã‚¢ãƒ‰ãƒ¬ãƒŠãƒªãƒ³ã®æ”¾å‡ºéŸ³ï¼‰ æ•°é€±é–“ãŸã£ã¦ã‚‚ã„ã¾ã èˆˆå¥®å†·ã‚ã‚„ã‚‰ã¬çŠ¶æ…‹ãªã®ã§ã€ä»Šæ—¥ã¯ãã®ä»¶ã«ã¤ã„ã¦æ›¸ã„ã¦ã¿ã‚ˆã†ã¨æ€ã„ã¾ã™ã€‚ Lingua::JA::Categorize - a Naive Bayes Classifier for Japanese document. http://search.cpan.org/~miki/Lingua-JA-Categorize-0.00001/ ã€Œã¯ã¦ãƒ–ã®ãƒ‘ã‚¯ãƒªã€ã§ã¯ã‚ã‚Šã¾ã›ã‚“ã€‚ã€Œãƒ™ã‚¤ã‚¸ã‚¢ãƒ³ã«ã‚ˆã‚‹æ—¥æœ¬èªžãƒ†ã‚ã‚¹ãƒˆåˆ†é¡žå™¨ã€ã‚’ã€Œç°¡å˜ã«ä½œã‚‹ã€ã“ã¨ã‚’ç›®çš„ã¨ã—ãŸãƒ¢ã‚¸ãƒ¥ãƒ¼ãƒ«ã§ã™ã€‚ ã‚‚
tfukui 2008/11/29
è‡ªç„¶è¨€èªžå‡¦ç†

perl
ãƒªãƒ³ã‚¯
ç¬¬1å›žã€€Perlã«ãŠã‘ã‚‹ãƒ†ã‚¹ãƒˆã®æ¦‚è¦ï¼TAPã¨ã¯ï¼Ÿ | gihyo.jp
ãƒ¢ãƒã‚¤ãƒ«ãƒ•ã‚¡ã‚¯ãƒˆãƒªãƒ¼ã®æ¾é‡Žã§ã™ã€‚ ä»Šå›žã‹ã‚‰æ•°å›žã«ã‚ãŸã£ã¦ã€Perl ã«ãŠã‘ã‚‹ãƒ†ã‚¹ãƒˆæ‰‹æ³•ã«ã¤ã„ã¦ãƒªãƒ¬ãƒ¼å½¢å¼ã§è©³ç´°ã«è§£èª¬ã—ã¦ã„ããŸã„ã¨ãŠã‚‚ã„ã¾ã™ã€‚ ä»Šå›žã¯åˆå›žã§ã™ã®ã§ã€ã–ã£ãã‚Šã¨æ¦‚è«–ã«ãªã‚Šã¾ã™ã€‚ Perlã®ä¸–ç•Œã«ãŠã‘ã‚‹ãƒ†ã‚¹ãƒˆã®é‡è¦æ€§ Perlã®ä¸–ç•Œã«ãŠã„ã¦ã¯ãƒ†ã‚¹ãƒˆï¼ˆtestï¼‰ã¯å¤§å¤‰é‡è¦è¦–ã•ã‚Œã¦ã„ã¾ã™ã€‚ ãã®ç‰¹å¾´ãŒã‚ˆãè¡¨ã‚Œã¦ã„ã‚‹ã®ãŒCPAN Testersã§ã¯ãªã„ã§ã—ã‚‡ã†ã‹ã€‚ CPAN Testers Perlã¨ã„ãˆã°ä½•ã¯ãªãã¨ã‚‚CPANãªã‚ã‘ã§ã™ãŒã€CPANã§ãƒ¢ã‚¸ãƒ¥ãƒ¼ãƒ«ã‚’æŽ¢ã—ã¦ã„ã‚‹ã¨ã€å›³1ã®ã‚ˆã†ã«ã€ã€Œâ CPAN Testersã€ã¨ã„ã†é …ç›®ãŒã‚ã‚‹ã“ã¨ã«æ°—ä»˜ãã¾ã™ã€‚ å›³1ã€€CPAN Testers ä¸–ç•Œä¸ã®Perl MongersãŒã€è‡ªåˆ†ã®ãƒžã‚·ãƒ³ã§ãƒ†ã‚¹ãƒˆã‚’å‹•ã‹ã—ã¦ã€ãã®çµæžœã‚’CPANã«é€ã£ã¦ã„ã‚‹ã®ã§ã™ã€‚ã“ã‚Œã«ã‚ˆã‚Šã€æ§˜ã€…ãªOSï¼CPUï¼versionã®Perlã§ãƒ†ã‚¹ãƒˆãŒã•ã‚Œã¦ã„ã¾ã™ã€‚è²´æ–¹ã‚‚æ°—è»½ã«CP
tfukui 2008/10/01
perl

ãƒ†ã‚¹ãƒˆ
ãƒªãƒ³ã‚¯
KinoSearch
Downloads: Current: KinoSearch-0.163.tar.gz Devel: KinoSearch-0.20_051.tar.gz Subversion repository Demos: www.rectangular.com/cgi-bin/uscon_search.cgi Docs: Current Devel Mailing Lists: KinoSearch Discussion KinoSearch Commits KinoSearch Smoke Testing Reports The KinoSearch mailing lists have been temporarily disabled during the move to a new server. Benchmarks: Indexing speed Wiki: FAQ, RoadMap,
tfukui 2008/04/30
lucene

perl

æ¤œç´¢
ãƒªãƒ³ã‚¯
PerlInterpMax ã®ç¤ºã™ã‚‚ã®
daily dayflower ãªã©ã®æƒ…å ±ã‚’ã¿ã¦ worker MPM ãª Apache ã‚’åˆ©ç”¨ã—ã¦ã‚‚ã€åŒæ™‚ã«åˆ©ç”¨å¯èƒ½ãª Perlã‚¤ãƒ³ã‚¿ãƒ—ãƒªã‚¿ï¼ˆmod_perlãƒ—ãƒã‚»ã‚¹ï¼‰ ã¯ PerlInterpMax ã«åˆ¶é™ã•ã‚Œã‚‹ã‚ˆã†ã«æ€ã£ã¦ã„ã¾ã—ãŸã€‚ãƒ‡ãƒ•ã‚©ãƒ«ãƒˆã§ã¯ã“ã®å€¤ã¯ 5 ã§ã‚ã‚Šã€ä¸€è¦‹å°‘ãªãæ„Ÿã˜ã‚‰ã‚Œã¾ã™ã€‚ ã‚µãƒ¼ãƒDoSäº‹ä»¶ ã”å˜ã˜ã®ã¨ãŠã‚Šæœ¬ blog.abk.nu ã‚µãƒ¼ãƒã¯ã€ä»¥å‰ã¾ã§ã€Œãƒ‡ãƒ¼ã‚¿ãƒ™ãƒ¼ã‚¹ã«æŽ¥ç¶šã§ããªã„ã‚¨ãƒ©ãƒ¼ã€ã‚’åã„ã¦ãƒ–ãƒã‚°ãŒè¡¨ç¤ºã•ã‚Œãªã„ã“ã¨ãŒå¤šã€…ç™ºç”Ÿã—ã¦ã„ã¾ã—ãŸ*1ã€‚ä»¥å‰ã®è¨å®šå€¤ã¯æ¬¡ã®ã¨ãŠã‚Šã§ã™ã€‚ mod_perl : PerlInterpMax 5 PostgreSQL : max_connections = 15 ã“ã‚Œã§ã‚‚ã€PostgreSQLã¸ã®ã‚³ãƒã‚¯ã‚·ãƒ§ãƒ³ãŒè¶³ã‚Šãªããªã‚Šã‚¨ãƒ©ãƒ¼ã¨ãªã£ã¦ã„ã¾ã—ãŸã€‚PostgreSQLã¸ã®ã‚³ãƒã‚¯ã‚·ãƒ§ãƒ³ã‚’ä¿æŒã™ã‚‹ãƒ‡ãƒ¼ãƒ¢ãƒ³ã¯ adiary ã®ä»–ã«ã‚ã‚Šã¾ã›ã‚“
tfukui 2008/03/11
mod_perl

perl

apache
ãƒªãƒ³ã‚¯
mod_perl ç’°å¢ƒä¸‹ã§ã‚„ã£ã¡ã‚ƒãƒ€ãƒ¡ãªã‚‚ã®ã‚’ã„ãã¤ã‹ã€‚
mod_perl ç’°å¢ƒä¸‹ã§ã‚„ã£ã¡ã‚ƒãƒ€ãƒ¡ãªã‚‚ã®ã‚’ã„ãã¤ã‹ã€‚ exit ã‚·ã‚¹ãƒ†ãƒ é–¢æ•° æ£ç¢ºã«ã¯ CORE::exit ã§ã™ã‘ã©ã€å®Ÿè¡Œã™ã‚‹ã¨ç¾åœ¨ã® Apache ãƒ—ãƒã‚»ã‚¹(nobody)ãŒè½ã£ã“ã¡ã¾ã™ã€‚ å½“ç„¶ root ã® Apache ã¯åãƒ—ãƒã‚»ã‚¹ã‚’ç«‹ã¡ä¸Šã’ãªãŠã™ã‚“ã§ ä½™åˆ†ãªã‚·ã‚¹ãƒ†ãƒ è² è·ãŒæŽ›ã‹ã‚Šã¾ã™ã—ã€mod_perl ã®ãƒ¡ãƒªãƒƒãƒˆã§ã‚ã‚‹ ã‚ãƒ£ãƒƒã‚·ãƒ¥åŠ¹æžœãŒå¾—ã‚‰ã‚Œãªã„ï¼æ™®é€šã®CGIå®Ÿè¡Œã‚ˆã‚Šéˆè¶³ã«ãªã‚‹ã¨ã„ã†ã€ ãªã‹ãªã‹è‡´å‘½çš„ãªçµæžœã«ãªã£ã¦ã—ã¾ã„ã¾ã™ï¼ˆï¼¾ï¼¾; ã“ã‚Œã‚’é¿ã‘ã‚‹ãŸã‚ã«ã€mod_perl ç’°å¢ƒä¸‹ã§ã¯ exit() é–¢æ•° ãŒ å®šç¾©ã•ã‚Œã¦ã‚‹ã®ã§ã€å¿…è¦ãªå ´åˆã«ã¯å¿…ãšä¸¸æ‹¬å¼§ã‚’ã¤ã‘ã¾ã›ã†ã€‚ â—‹ exit( 0 ); Ã— exit 0; åŒã˜ã“ã¨ãŒã€die ã‚·ã‚¹ãƒ†ãƒ é–¢æ•° ã«ã‚‚è¨€ãˆã¾ã™ã€‚ã“ã£ã¡ã¯ç´ ç›´ã« ã€Œuse Carpã€ã—ã¦ã€Œcroak é–¢æ•°ã€ã§ä»£æ›¿ã—ãŸã»ã†ãŒå®‰å…¨ã ã¨æ€ã†ã€‚ ï¼ƒeval ã®ä¸ã§ CORE:
tfukui 2008/03/11
mod_perl

perl
ãƒªãƒ³ã‚¯
Perlã‚ªãƒ–ã‚¸ã‚§ã‚¯ãƒˆæŒ‡å‘ãƒ—ãƒã‚°ãƒ©ãƒŸãƒ³ã‚°
-> è¶£æ—¨ã¨æ³¨æ„æ›¸ã -> èº«è¿‘ãªpackage -> ãªã‚“ã®ãŸã‚ã®package ? -> What's `new' ? -> bless ( reference => package ) -> Hello, Module World! -> ã‚ªãƒ–ã‚¸ã‚§ã‚¯ãƒˆï¼Ÿ -> main ãƒ‘ãƒƒã‚±ãƒ¼ã‚¸ã¨é–¢é€£ä»˜ã‘ã¦ã¿ã‚‹ -> ã‚¯ãƒ©ã‚¹ã¨ãƒ¡ã‚½ãƒƒãƒ‰ -> ã‚ªãƒ–ã‚¸ã‚§ã‚¯ãƒˆæŒ‡å‘ -> ã‚ªãƒ–ã‚¸ã‚§ã‚¯ãƒˆãŒãƒªãƒ•ã‚¡ãƒ¬ãƒ³ã‚¹ãªã‚‰â€¦ -> -> ã‚’é€£ç¶šã™ã‚‹ -> ç¶™æ‰¿ -> å¤šé‡ç¶™æ‰¿ -> å¤šé‡ç¶™æ‰¿ã‚’ã‚„ã‚ã‚‹ -> å¤šé‡ç¶™æ‰¿ã‚’ã‚„ã‚ã‚‹(ã‚‚ã†å°‘ã—ç°¡å˜ã«) -> æƒ…å ±æº(æ›¸ç±ç‰) <- ãƒ¢ãƒ‰ãƒ« è¶£æ—¨ã¨æ³¨æ„æ›¸ã ã“ã‚Œã‚’èªã‚“ã§ã‚‚ã€ã‚ã‚“ã¾ã‚Šãã¡ã£ã¨ã—ãŸçŸ¥è˜ã¯ã€èº«ã«ä»˜ãã¾ã›ã‚“ï¼ˆ^^; ã‚ªãƒ–ã‚¸ã‚§ã‚¯ãƒˆæŒ‡å‘ã®æ¦‚å¿µã¯ã»ã‚“ã®å°‘ã—ã—ã‹èª¬æ˜Žã—ã¾ã›ã‚“ã€‚ã“ã“ã§è¿°ã¹ã‚‹ã®ã¯ã€Perlã§ã©ã†ã‚„ã‚‹ã‹ã£ã¦ã®ãŒä¸»ã§ã™ï¼ˆãã‚Œã‚‚ä¸ååˆ†ï¼†å˜˜ã¾ã˜ã‚Šã‹ã‚‚ï¼‰ã€‚ ã¨ã‚Šã‚ãˆãšã€ãƒ¢ã‚¸ãƒ¥ãƒ¼ãƒ«ã‚’ä½œã‚Š
tfukui 2008/03/08
perl

ã‚ªãƒ–ã‚¸ã‚§ã‚¯ãƒˆæŒ‡å‘
ãƒªãƒ³ã‚¯
Mint's log: Frozen Perl 2008ãƒ¡ãƒ¢ãã®1ï¼šIntroduction to OOPï¼ˆã‚ªãƒ–ã‚¸ã‚§ã‚¯ãƒˆæŒ‡å‘Perlå…¥é–€ï¼‰
2008å¹´3æœˆ6æ—¥ Frozen Perl 2008ãƒ¡ãƒ¢ãã®1ï¼šIntroduction to OOPï¼ˆã‚ªãƒ–ã‚¸ã‚§ã‚¯ãƒˆæŒ‡å‘Perlå…¥é–€ï¼‰ ç´ æ™´ã‚‰ã—ã„ç™ºè¡¨ã ã£ãŸã€‚ã‚ªãƒ–ã‚¸ã‚§ã‚¯ãƒˆæŒ‡å‘ã®å…¥é–€ã€ãã‚Œã‚‚Perlã§ã€ã¨ãªã‚‹ã¨ã‚ã‹ã‚Šã‚„ã™ã„æ–‡çŒ®ã¯ãªã‹ãªã‹ãªã„ã€‚æ–‡çŒ®ã¯ãŸãã•ã‚“ã‚ã‚‹ã®ã ãŒã€ã©ã‚Œã‚‚ã€Œã‚ã‹ã‚‹äººã«ã—ã‹ã‚ã‹ã‚‰ãªã„ã€ã¨ã„ã†ã‚¿ã‚¤ãƒ—ã®ã‚ˆã†ã«æ€ã†ã€‚ã•ã‚‰ã«ã‚«ãƒ³ãƒ•ã‚¡ãƒ¬ãƒ³ã‚¹ã§è¡Œã‚ã‚Œã‚‹ã€Œâ—‹â—‹å…¥é–€ã€ãŒã‚ã‹ã‚Šã‚„ã™ã‹ã£ãŸãŸã‚ã—ãŒãªã„ã®ã§æœŸå¾…ã—ãªã„ã§ã„ãŸã‚‰ã€ã“ã‚ŒãŒå®Ÿã«åˆå¿ƒè€…ã«ã‚„ã•ã—ã„ã‚‚ã®ã ã£ãŸã€‚ã‚¹ãƒ©ã‚¤ãƒ‰ãŒå…¬é–‹ã•ã‚Œã¦ã„ã‚‹ã€‚ãƒŽãƒ¼ãƒˆã‚’ãŸãã•ã‚“ã¨ã£ãŸã®ã«â€¦â€¦ã€‚Perlã®ã‚ªãƒ–ã‚¸ã‚§ã‚¯ãƒˆæŒ‡å‘é–¢ä¿‚ç”¨èªžï¼ˆMintæ³¨ï¼šã“ã®é …ã¯ã„ããªã‚Šã‚ã‹ã‚‰ãªãã¦ã„ã„ã¨æ€ã†ï¼‰ã€Œã‚ªãƒ–ã‚¸ã‚§ã‚¯ãƒˆã€ã¨ã¯â†’bless()ã•ã‚ŒãŸãƒãƒƒã‚·ãƒ¥ãƒªãƒ•ã‚¡ãƒ¬ãƒ³ã‚¹ã€Œã‚¯ãƒ©ã‚¹ã€ã¨ã¯â†’ãƒ‘ãƒƒã‚±ãƒ¼ã‚¸ï¼ˆpackageï¼‰ã€Œãƒ¡ã‚½ãƒƒãƒ‰ã€ã¨ã¯â†’ãƒ‘ãƒƒã‚±ãƒ¼ã‚¸ã®ä¸ã®ã‚µãƒ–ãƒ«ãƒ¼ãƒãƒ³ï¼ˆsubï¼‰Personãƒ¢ã‚¸ãƒ¥ãƒ¼ãƒ«ã‚’ä½¿ã£ãŸã‚ª
tfukui 2008/03/08
perl

ã‚ªãƒ–ã‚¸ã‚§ã‚¯ãƒˆæŒ‡å‘
ãƒªãƒ³ã‚¯
Part1 æ£ã—ã„Perl/CGIã®æ›¸ãæ–¹ï¼šITpro
Shibuya Perl Mongers 2ä»£ç›®ãƒªãƒ¼ãƒ€ãƒ¼ã«ã—ã¦ï¼Œppencodeã®ä½œè€…ã€‚åºƒå³¶å¸‚ç«‹å¤§å¦å’æ¥å¾Œï¼Œå¤§ä¼æ¥å‘ã‘mod_perlè£½å“ã®é–‹ç™ºã«å¾“äº‹ã€‚2005å¹´ã‚ˆã‚Šã‚µã‚¤ãƒœã‚¦ã‚ºãƒ»ãƒ©ãƒœæ ªå¼ä¼šç¤¾ã«å…¥ç¤¾ã€‚LL Ringã«å‚æˆ¦ã€‚Namazu for Win32ï¼ŒPlaggerï¼ŒAjajaã®ã‚³ãƒŸãƒƒã‚¿ãƒ¼ã§ã‚‚ã‚ã‚‹ã€‚ CGIã¨ã„ãˆã°Perlã€‚ãã‚“ãªé¢¨ã«ã„ã‚ã‚Œã¦ã„ãŸæ™‚æœŸã‚‚ã‚ã‚Šã¾ã—ãŸã€‚ãƒ¬ãƒ³ã‚¿ãƒ«ãƒ»ã‚µãƒ¼ãƒãƒ¼ã®CGIã§æ‰‹è»½ã«PerlãŒä½¿ãˆãŸã“ã¨ã‚‚ã‚ã‚Šï¼Œã¡ã‚‡ã£ã¨ã—ãŸæŽ²ç¤ºæ¿ã®ã‚¹ã‚¯ãƒªãƒ—ãƒˆã‚„ã‚¢ã‚¯ã‚»ã‚¹ãƒ»ã‚«ã‚¦ãƒ³ã‚¿ãªã©ï¼ŒCGIãƒ—ãƒã‚°ãƒ©ãƒ ã®å¤šããŒPerlã§æ›¸ã‹ã‚Œã¦ã„ã¾ã—ãŸã€‚ã“ã®ãŸã‚PerlãŒçˆ†ç™ºçš„ã«æ™®åŠã—ãŸã®ã§ã™ã€‚Perlã¯æ—¥æœ¬ã®ã‚¤ãƒ³ã‚¿ãƒ¼ãƒãƒƒãƒˆé»Žæ˜ŽæœŸã‚’æ”¯ãˆãŸãƒ—ãƒã‚°ãƒ©ãƒŸãƒ³ã‚°è¨€èªžã¨ã—ã¦ï¼Œåºƒããã®åãŒçŸ¥ã‚‰ã‚Œã¦ã„ã¾ã™ã€‚ ãã®åŠé¢ï¼ŒPerlã§æ›¸ã‹ã‚ŒãŸãƒ—ãƒã‚°ãƒ©ãƒ ã®ä¿å®ˆæ€§ã«æ‚©ã‚€å£°ã‚‚èžã‹ã‚Œã‚‹ã‚ˆã†ã«ãªã‚Šã¾ã—ãŸã€‚äº‹å®Ÿï¼ŒPerlã®ãƒ—ãƒã‚°ãƒ©ãƒŸãƒ³ã‚°çµŒé¨“ãŒå°‘
tfukui 2007/10/23
perl
ãƒªãƒ³ã‚¯
Perl 5.8.x Unicodeé–¢é€£
-> è¶£æ—¨ã¨æ³¨æ„æ›¸ã -> UTF8ãƒ•ãƒ©ã‚°ï¼Ÿ -> UTF8ãƒ•ãƒ©ã‚°ã¨PerlIOãƒ¬ã‚¤ãƒ¤ -> UTF8ãƒ•ãƒ©ã‚°ã®ã¤ã„ãŸæ–‡å—åˆ—ã‚’è¨˜è¿°ã™ã‚‹ -> Wide character in print ... -> Encode -> utf8::* -> use utf8; -> use encoding; -> use UTF8 ã¨ use encoding -> Jcodeã‹ã‚‰Encodeã¸ -> æƒ…å ±æº <- ãƒ¢ãƒ‰ãƒ« è¶£æ—¨ã¨æ³¨æ„æ›¸ã Perl 5.8.x ã®Unicode é–¢é€£ã§ã™ã€‚ æ£ç›´ã€5.8.x ã¯ã€ãƒã‚¿ã§ã—ã‹ä½¿ã£ã¦ãªã‹ã£ãŸã®ã§(ã‰ã€ã¡ã‚ƒã‚“ã¨ã„ã˜ã£ãŸã“ã¨ãŒã‚ã‚Šã¾ã›ã‚“ã§ã—ãŸã€‚ ä½¿ã£ã¦ã¿ã‚‹ã¨ã€ã‚ˆãã‚ã‹ã‚“ãªããªã£ãŸã®ã§ã€ã¡ã‚‡ã£ã¨ã¾ã¨ã‚ã¦ã¿ã¾ã—ãŸã€‚ ä»Šã§ã‚‚ã‚ã‚“ã¾ã‚Šã‚ã‹ã£ã¦ãªã„ã‹ã‚‚ã—ã‚Œãªã„ã®ã§ã€å†…å®¹ã¯ç„¡ä¿è¨¼ã§ã™ã€‚ çªã£è¾¼ã¿æ“è¿Žã€‚ Jcodeã€Encodeã®ãƒ¡ãƒ³ãƒ†ãƒŠã®å¼¾ã•ã‚“ã‹ã‚‰ã€ã”æŒ‡æ‘˜ã„ãŸã ã„ãŸã®ã§ã€
tfukui 2007/08/30
perl

utf8

unicode
ãƒªãƒ³ã‚¯
ã€ã‚¤ãƒ³ãƒ•ã‚©ã‚·ãƒ¼ã‚¯ã€‘Infoseek ï¼š æ¥½å¤©ãŒé‹å–¶ã™ã‚‹ãƒãƒ¼ã‚¿ãƒ«ã‚µã‚¤ãƒˆ
æ—¥é ƒã‚ˆã‚Šæ¥½å¤©ã®ã‚µãƒ¼ãƒ“ã‚¹ã‚’ã”åˆ©ç”¨ã„ãŸã ãã¾ã—ã¦ã‚ã‚ŠãŒã¨ã†ã”ã–ã„ã¾ã™ã€‚ ã‚µãƒ¼ãƒ“ã‚¹ã‚’ã”åˆ©ç”¨ã„ãŸã ã„ã¦ãŠã‚Šã¾ã™ã¨ã“ã‚å¤§å¤‰ç”³ã—è¨³ã”ã–ã„ã¾ã›ã‚“ãŒã€ç¾åœ¨ã€ç·Šæ€¥ãƒ¡ãƒ³ãƒ†ãƒŠãƒ³ã‚¹ã‚’è¡Œã‚ã›ã¦ã„ãŸã ã„ã¦ãŠã‚Šã¾ã™ã€‚ ãŠå®¢æ§˜ã«ã¯ã€ç·Šæ€¥ã®ãƒ¡ãƒ³ãƒ†ãƒŠãƒ³ã‚¹ã«ã‚ˆã‚Šã€ã”è¿·æƒ‘ã‚’ãŠã‹ã‘ã—ã¦ãŠã‚Šã€èª ã«ç”³ã—è¨³ã”ã–ã„ã¾ã›ã‚“ã€‚ ãƒ¡ãƒ³ãƒ†ãƒŠãƒ³ã‚¹ãŒçµ‚äº†æ¬¡ç¬¬ã€ã‚µãƒ¼ãƒ“ã‚¹ã‚’å¾©æ—§ã„ãŸã—ã¾ã™ã®ã§ã€ ä»Šã—ã°ã‚‰ããŠå¾…ã¡ã„ãŸã ã‘ã¾ã™ã‚ˆã†ã€ãŠé¡˜ã„ç”³ã—ä¸Šã’ã¾ã™ã€‚
tfukui 2007/08/15
perl

å®Ÿä½“å‚ç…§
ãƒªãƒ³ã‚¯
1