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

ku0522 id:ku0522

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

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

DBDã§UTF8 flaggedãªæ–‡å—åˆ—ã‚’è¿”ã™ - hide-k.net#blog
\mysql_enable_utf8 => 1 ã§ DBIC::UTF8Columns è¦ã‚‰ãªããªã‚‹ã£ã½ã„ - åƒ•ãƒˆäº‘ãƒ•äº‹ï¼ ã¯ã¦ãªå‡ºå¼µç‰ˆ æ¥ãšã‹ã—ãªãŒã‚‰çŸ¥ã‚Šã¾ã›ã‚“ã§ã—ãŸã€‚ DBIx::Classã®å ´åˆã€DBIx::Class::UTF8Columnsã‚’ä½¿ã£ã¦utf8_columns()ã§UTF8ãƒ•ãƒ©ã‚°ã‚’ç«‹ã¦ãŸã„ã‚«ãƒ©ãƒ ã‚’æŒ‡å®šã™ã‚‹ã®ã§ã™ãŒã€ç‰¹å®šã®ã‚«ãƒ©ãƒ ã ã‘ã«UTF8ãƒ•ãƒ©ã‚°ã‚’ç«‹ã¦ã‚‹ã¨ã„ã†ã®ã¯ç¨€ã§ã€å…¨ã¦ã®æ–‡å—åˆ—ã®ã‚«ãƒ©ãƒ ã«ç«‹ã¦ã‚‹ã®ãŒå¤šãã®å ´åˆã ã¨æ€ã„ã¾ã™ã€‚ ã®ã§ã€DBDã®ãƒ¬ã‚¤ãƒ¤ãƒ¼ã§å¸åŽã™ã‚‹ã“ã®æ–¹æ³•ãŒå€‹äººçš„ã«ã‚‚ãƒ™ã‚¹ãƒˆãƒ—ãƒ©ã‚¯ãƒ†ã‚£ã‚¹ã ã¨æ€ã„ã¾ã™ã€‚ vkgtaro++ å‚™å¿˜ã§ã¾ã¨ã‚ã¦ãŠãã¨å„DBDã®æŽ¥ç¶šã‚ªãƒ—ã‚·ãƒ§ãƒ³ã§ mysql: mysql_enable_utf8 postgresql: pg_enable_utf8 sqlite: unicode ã«1ã‚’æŒ‡å®šã™ã‚‹ã“ã¨ã«ã‚ˆã‚Šã€å…¨ã¦ã®æ–‡å—åˆ—ã®ã‚«ãƒ©ãƒ ã®å€¤ã«UTF
ku0522 2009/02/05
perl

DBD

utf8
ãƒªãƒ³ã‚¯
Big Sky :: SQLiteã‚’ä½¿ã£ã¦TheSchwart
æœ€è¿‘TheSchwartãŒè³‘ã‚ã£ã¦ã‚‹æ§˜ã§ã™ãã€‚ TheSchwartzã§ä»•äº‹ã‚’ã‚ã¨ã«ã¾ã‚ã™ - bits and bytes ãªã‘ã‚Œã°å‹æ‰‹ã«ä½œã£ã¦ãã‚Œã‚‹ã®ã‹ãªã¨æ€ã£ã¦SYNOPSISã®ã‚³ãƒ¼ãƒ‰ã‚’å®Ÿè¡Œã—ã¦ã¿ãŸã‘ã©ã‚„ã£ã±ã‚Šè‡ªå‹•ã§ã§ããŸã‚Šã¯ã—ãªãã†ã ã£ãŸã®ã§èª¿ã¹ãŸã‚‰Catalyst and TheSchwartz: Reliable JobQueue in a great framework - Voxã«schema.sqlã‚’ä½¿ã†ã¨ã„ã„ã¨æ›¸ã„ã¦ã‚ã‚Šã¾ã—ãŸã€‚ã“ã®ã‚¹ã‚ãƒ¼ãƒžã‚’mysqlã§å®Ÿè¡Œã™ã‚Œã°TheSchwartzã®ã‚ãƒ¥ãƒ¼ã‚’ç®¡ç†ã™ã‚‹ãŸã‚ã®ãƒ†ãƒ¼ãƒ–ãƒ«ãŒå‡ºæ¥ä¸ŠãŒã‚Šã¾ã™ã€‚ http://labs.gmo.jp/blog/ku/2008/06/theschwartz.html Twitter / ku: TheSchwartzãŠã‚‚ã—ã‚ã‹ã£ãŸ sqliteã§å‹•... TheSchwartzãŠã‚‚ã—ã‚ã‹ã£ãŸ sql
ku0522 2009/01/27
CREATE TABLE funcmap ( funcid INTEGER PRIMARY KEY, funcname VARCHAR(255) NOT NULL, UNIQUE(funcname) ); CREATE TABLE job ( jobid INTEGER PRIMARY KEY, funcid INTEGER NOT NULL, arg MEDIUMBLOB, uniqkey VARCHAR(255) NULL, insert_time INTEGER UNSIGNED, run_after INTEGER UNSIGNED NOT NULL, grabbed_until INTEGER UNSIGNED NOT NULL, priority SMALLINT UNSIGNED, coalesce VARCHAR(255), UNIQUE(funcid, uniqkey) ); CREATE INDEX job_idx_1 ON job (funcid, run_after); CREATE INDEX job_idx_2 ON job (funcid, coalesce); CREATE TABLE note ( jobid INTEGER NOT NULL, notekey VARCHAR(255), value BLOB ); CREATE TABLE error ( error_time INTEGER UNSIGNED NOT NULL, jobid INTEGER NOT NULL, message VARCHAR(255) NOT NULL, funcid INTEGER NOT NULL DEFAULT 0 ); CREATE INDEX error_idx_1 ON error (funcid, error_time); CREATE INDEX error_idx_2 ON error (error_time); CREATE INDEX error_idx_3 ON error (jobid); CREATE TABLE exitstatus ( jobid INTEGER PRIMARY KEY, funcid INTEGER NOT NULL DEFAULT 0, status SMALLINT UNSIGNED, completion_time INTEGER UNSIGNED, delete_after INTEGER UNSIGNED ); CREATE INDEX exitstatus_idx_1 ON exitstatus (funcid); CREATE INDEX exitstatus_idx_2 ON exitstatus (delete_after);

TheSchwartz

perl

sqlite
ãƒªãƒ³ã‚¯
ãƒªã‚¹ã‚¯ãªãæ³¨ç›®ãƒ™ãƒ³ãƒãƒ£ãƒ¼ã®CTOã«ãªã‚‹æ–¹æ³• | GMO VP å–ç· å½¹/ãƒ•ã‚¡ã‚¦ãƒ³ãƒ‡ã‚£ãƒ³ã‚°ãƒ‘ãƒ¼ãƒˆãƒŠãƒ¼æ‘æ¾ç«œã®ãƒ–ãƒã‚° | GMOãƒ™ãƒ³ãƒãƒ£ãƒ¼ãƒ‘ãƒ¼ãƒˆãƒŠãƒ¼ã‚º
æ–°ä¼šç¤¾ã«ã¦ã€Perl ã‚¨ãƒ³ã‚¸ãƒ‹ã‚¢ã‚’å‹Ÿé›†ï¼ã‚ãªãŸã®æŠ€è¡“ã§ä¸–ç•Œã‚’å¤‰ãˆã¦ä¸‹ã•ã„ï¼ ç¾åœ¨é€²è¡Œä¸ã®ã¨ã‚ã‚‹ã‚¤ãƒ³ã‚ãƒ¥ãƒ™ãƒ¼ã‚·ãƒ§ãƒ³æ¡ˆä»¶ã«ã¦ã€Webã‚µãƒ¼ãƒ“ã‚¹ã®ã‚·ã‚¹ãƒ†ãƒ ã®ç«‹ã¡ä¸Šã’ãƒ»ä¼šç¤¾ã®å‰µæ¥ã«å‚ç”»ã—ã€ã‚†ãã‚†ãã¯CTOã‚„å½¹å“¡ã¨ã—ã¦æ´»èºã—ãŸã„ã¨è€ƒãˆã¦ã„ã‚‹ã€Perl ã‚¨ãƒ³ã‚¸ãƒ‹ã‚¢ã®æ–¹ã‚’å‹Ÿé›†ã—ã¦ãŠã‚Šã¾ã™ã€‚ åºƒå‘Šãƒ»ã‚¦ã‚£ã‚¸ã‚§ãƒƒãƒˆã®å¤§é‡é…ä¿¡ã‚·ã‚¹ãƒ†ãƒ ã®è¨è¨ˆãƒ»é–‹ç™ºãƒ»é‹ç”¨ã«æºã‚ã£ãŸå„ªç§€ãªè€…ãŒãŠã‚Šã€ã‚¢ãƒ‰ãƒã‚¤ã‚¶ãƒ¼ã¨ãªã‚‹äºˆå®šã§ã™ã€‚ã‚¢ãƒ‰ãƒã‚¤ã‚¶ãƒ¼ã‹ã‚‰ã®ã‚µãƒãƒ¼ãƒˆã‚’å¾—ãªãŒã‚‰ã®ã€ã‚¼ãƒã‹ã‚‰ã®ã‚·ã‚¹ãƒ†ãƒ æ§‹ç¯‰ãŒæœ€åˆã®æ¥å‹™ã¨ãªã‚Šã¾ã™ã€‚ ãƒãƒƒãƒˆã®ã‚ã‚‹æ¥ç•Œãƒ»åˆ†é‡Žã‚’å¤‰ãˆã‚‹ã“ã¨ã«ãªã‚‹ã€ã¨ã¦ã‚‚é‡Žå¿ƒçš„ãªãƒ—ãƒã‚¸ã‚§ã‚¯ãƒˆã§ã™ã€‚ ãƒªã‚¹ã‚¯ãªãCTOã«ãªã‚Œã‚‹ãƒãƒ£ãƒ³ã‚¹ã¨ã‚‚ã„ãˆã¾ã™ã€‚ ã„ã£ãŸã„ã€ãªãœPerlãªã®ã‹ã€ã€ãã®ç”ã‚‚å«ã‚ã¦ã€æ˜¯éžãŠå•ã„åˆã‚ã›ãã ã•ã„ï¼ mail to: muramatsu@gmo-vp.com
ku0522 2009/01/15
perl
ãƒªãƒ³ã‚¯
Class::DBI ã§ç–‘ä¼¼çš„ã‚«ãƒ©ãƒ ã‚’æ‰±ã† : ã«ã½ãŸã‚“ç ”ç©¶æ‰€
æœ€è¿‘ã€SQL ã§ WHERE å¥ã«å…¥ã‚‰ãšã€ORDER BY ã‚„ã‚‰ GROUP BY ã‚‚ã•ã‚Œãšã€ã‹ã¤ MAX() ã ã¨ã‹ MIN() ã ã¨ã‹ã‚’æ±‚ã‚ã‚‰ã‚Œã‚‹å¿…è¦ã‚‚ãªã„ã€è¨€ã†ãªã‚Œã°ã€Œå–ã‚‹ã«è¶³ã‚‰ãªã„å€¤ã€ã¨ã‹ã‚’ã€å€‹åˆ¥ã®ã‚«ãƒ©ãƒ ã«æŒãŸãšã€ãã†ã„ã†ã®ã‚’ä¸€æ°—ã«ã¾ã¨ã‚ã¦ text åž‹ã®ã‚«ãƒ©ãƒ ã«å…¥ã‚ŒãŸã‚Šã™ã‚‹ã“ã¨ãŒã‚ã£ãŸã‚Šã™ã‚‹ã€‚ ä¾‹ãˆã°ã€ä½æ‰€éŒ²ã‚’ä½œã‚ã†ãªã‚“ã¤ã£ã¦ã€ãƒ†ãƒ¼ãƒ–ãƒ«ã‚’çµ„ã¿ãŸã„ã‚ã‘ã ãŒã€ãã‚‚ãã‚‚ WHERE å¥ã«å…¥ã‚‹è¦ç´ ãªã‚“ã¦åå‰ãã‚‰ã„ã—ã‹ãªã„ãªãâ€¦ã¨ã„ã†å ´åˆã¯ CREATE table address ( id int unsigned NOT NULL auto_increment, name varchar(255) NOT NULL default '', props text, PRIMARY KEY (id), KEY (name) ); ã“ã‚“ãªã‚ˆã†ãªãƒ†ãƒ¼ãƒ–ãƒ«ã‚’ä¸€å€‹ä½œã£ã¦ãŠã„ãŸã‚Šã—ã¦ã€‚ è¦ã™ã‚‹ã«ã€n
ku0522 2007/11/07
dbã«RDFDBã¿ãŸã„ã«ã¦ãã¨ã†ãªã‚«ãƒ©ãƒ ã‚’å‹•çš„ã«æ›¸ã„ãŸã‚Šã™ã‚‹ã€‚

perl

db
ãƒªãƒ³ã‚¯
HTML::FeaturedImage - URLã«å«ã¾ã‚Œã‚‹ç”»åƒã®ã†ã¡ã€é‡è¦ãã†ãªã‚‚ã®ã‚’å–ã‚Šå‡ºã™ãŸã‚ã®Perlãƒ¢ã‚¸ãƒ¥ãƒ¼ãƒ« - fubaã¯ã¦ãª
yuisekiãŒã€Œã‚¨ãƒ³ãƒˆãƒªã®ãƒ¡ã‚¤ãƒ³ç”»åƒæŠ½å‡ºãŒã‚ã‚‹ã¨ã„ã„ã‹ã‚‚ã€ã¨è¨€ã£ã¦ãŸã¨ãã«ã€æ˜¼é£¯ã¾ã§æš‡ã ã£ãŸã®ã§ä½œã£ãŸã€‚çµæžœã®ã‚µãƒ³ãƒ—ãƒ«ã¯ã“ã¡ã‚‰ã€‚ ä»•çµ„ã¿ã¯ã¦ãã¨ã†ã€‚ã¾ãšURLã‚’ãŸãã•ã‚“ä¸Žãˆã€ãã®å…ˆã«ã‚ã‚‹ç”»åƒã®æ•°ã‚’æ•°ãˆã‚‹ã€‚ãŸãã•ã‚“ã®ãƒšãƒ¼ã‚¸ã«ã§ã¦ããŸã‚Šã€ä½•åº¦ã‚‚ãŠãªã˜ãƒšãƒ¼ã‚¸ã«å‡ºã¦ãã‚‹ç”»åƒã¯ã©ã†ã§ã‚‚ã„ã„ã‚‚ã®ã¨ã—ã¦ã€æ¶ˆã™ã€‚ã‚ˆãã‚ã‚‹ã‚„ã‚Šæ–¹ã ã‘ã©å¼·åŠ›ã€‚ ã‚ˆãè€ƒãˆã‚‹ã¨HTML::ã˜ã‚ƒãªã„æ„Ÿã˜ãŒã—ã¦ããŸã€‚ã‚ã¨ã§ç›´ã™ã‹ã‚‚ã€‚HTML::ã¨ã—ã¦ãµã•ã‚ã—ãã™ã‚‹ãŸã‚ã€Web::Scraperã«contentæ¸¡ã›ã‚‹ã‚ˆã†ã«ã—ãŸã€‚ $content = "<html>..."; $hfi->add_page($url, $content);ã‚ã¨ã€ãƒªãƒ³ã‚¯å…ˆãŒç”»åƒã£ã½ã„URLã®ã¨ãã«ã¯a hrefã‚‚å–ã‚‹ã‚ˆã†ã«ã—ãŸã€‚é–¾å€¤ã®ã‚ãƒ£ãƒƒã‚·ãƒ¥ã¨ã‹ã¡ã‚‡ã£ã¨ã‚¢ãƒ«ã‚´ãƒªã‚ºãƒ å¤‰æ›´ã¨ã‹ã€ç´°ã‹ã„ã¨ã“ã‚ã‚‚å¤‰æ›´ã€‚ã¡ã‚‡ã£ã¨ãƒŽã‚¤ã‚ºå…¥ã‚‹ã‚ˆã†ã«ãªã£ãŸã‘ã©ã€ãŸã¶ã‚“æ¬²ã—ã„ç‰©ã¯ç¢ºå®Ÿã«
ku0522 2007/11/01
çµ±è¨ˆçš„ã‚¢ãƒ—ãƒãƒ¼ãƒã€‚è¤‡æ•°ãƒšãƒ¼ã‚¸ä¸ã«å¤šæ•°å‡ºã¦ãã‚‹ã‚‚ã®ã‚’æ¨ã¦ã‚‹ã€‚ã—ãã„å€¤æ¬¡ç¬¬ã§ãƒ¡ã‚¤ãƒ³ã®ã‚‚ã®ãŒæ®‹ã‚‹ã€‚

perl

data
ãƒªãƒ³ã‚¯
å …ç‰¢ãªãƒ‘ã‚¹ãƒ¯ãƒ¼ãƒ‰ã‚’å¼·åˆ¶ã™ã‚‹ãƒ†ã‚¯ãƒ‹ãƒƒã‚¯ - æ—¥å‘å¤ç‰¹æ®Šå¿œæ´éƒ¨éšŠ
ã‚„ã£ã±ã‚Šã‚µãƒ¼ãƒ“ã‚¹å´ã§å …ç‰¢ãªãƒ‘ã‚¹ãƒ¯ãƒ¼ãƒ‰ã‚’ãƒ¦ãƒ¼ã‚¶ãƒ¼ã«å¼·åˆ¶ã™ã‚‹ä»•çµ„ã¿ãŒç„¡ã„ã¨å•é¡ŒãŒã‚ã‚‹ã‚µãƒ¼ãƒ“ã‚¹ã¨è¨€ã†ã®ã¯ãŸãã•ã‚“ã‚ã‚‹ã£ã¦äº‹ã§ã€Perlã§å‡ºæ¥ã‚‹é™ã‚Šç°¡å˜ã«ãã†ã„ã†ä»•çµ„ã¿ã‚’ä½œã‚Œãªã„ã‹ãªã¨ã€‚ å¹¾ã¤ã‹ãƒ”ãƒƒã‚¯ã‚¢ãƒƒãƒ—ã—ã¦ã¿ã¾ã—ãŸã€‚ Data::Passwordãƒ¢ã‚¸ãƒ¥ãƒ¼ãƒ«ã‚’ä½¿ã† çœŸã£å…ˆã«ã“ã‚Œã€‚UNIXç³»OSã§ã®ãƒ‘ã‚¹ãƒ¯ãƒ¼ãƒ‰ã®å¼·åº¦ãƒã‚§ãƒƒã‚¯ã¨ä¼¼ãŸãƒ¢ã‚¸ãƒ¥ãƒ¼ãƒ«ã®ã‚ˆã†ã§ã™ã€‚ use Data::Password qw(:all); print IsBadPassword("hogehoge"); æ–‡å—åˆ—ãŒè¡¨ç¤ºã•ã‚Œã¡ã‚ƒã†å ´åˆã¯NGãªãƒ‘ã‚¹ãƒ¯ãƒ¼ãƒ‰ã€‚ ã“ã®ãƒ¢ã‚¸ãƒ¥ãƒ¼ãƒ«ã¯è¾žæ›¸è¨å®šã‚‚å‡ºæ¥ã‚‹ã‚ˆã†ã§ã™ã€‚ @Data::Password::DICTIONARIESã«è¾žæ›¸ãƒ•ã‚¡ã‚¤ãƒ«ã‚’æŒ‡å®šã—ã¦ãŠãã¨ãã“ã®å†…å®¹ã‚‚è¦‹ã¦ãã‚Œã‚‹ã¿ãŸã„ã€‚ ã‚ã‚ŠãŒã¡ãªãƒ‘ã‚¹ãƒ¯ãƒ¼ãƒ‰é›†ã¯ftp://ftp.ox.ac.uk/pub/wordlists/ã«è¨€èªžåˆ¥ã«ã‚ã‚Šã¾ã™ã€‚ ã¾ãŸU
ku0522 2007/10/29
ãƒ‘ã‚¹ãƒ¯ãƒ¼ãƒ‰ã®å¼·åº¦åˆ¤å®š

security

perl
ãƒªãƒ³ã‚¯
XML-Diff-0.05
The London Perl and Raku Workshop takes place on 26th Oct 2024. If your company depends on Perl, please consider sponsoring and/or attending.
ku0522 2007/10/04
XML

diff

algorithm

perl
ãƒªãƒ³ã‚¯
ã²ã’ã½ã‚“ OSã¨ã‹ä½œã£ã¡ã‚ƒã†ã‹Mona- - [Perl] XSåˆ©ç”¨ã§Perlé«˜é€ŸåŒ–
ï¼ˆè¿½è¨˜ï¼š2009/03/25ï¼‰ id:tokuhirom ã•ã‚“ã‹ã‚‰ã‚³ãƒ¡ãƒ³ãƒˆã‚’é ‚ãã¾ã—ãŸã€‚ã“ã®ãƒ™ãƒ³ãƒãƒžãƒ¼ã‚¯ã¯å•é¡ŒãŒã‚ã‚‹ãã†ã§ã™ã€‚ http://d.hatena.ne.jp/higepon/20050615/1118829090#c ï¼ˆè¿½è¨˜ï¼šçµ‚ã‚ã‚Šï¼‰ Perlã«ã¯Cè¨€èªžã§æ›¸ã‹ã‚ŒãŸé–¢æ•°ã‚’å‘¼ã³å‡ºã™ãŸã‚ã«XSã¨ã„ã†ä»•çµ„ã¿ãŒå˜åœ¨ã—ã¾ã™ã€‚ ä¸€éƒ¨CPANãƒ¢ã‚¸ãƒ¥ãƒ¼ãƒ«ã§ã‚‚ä½¿ã‚ã‚Œã¦ã„ã‚‹ãŸã‚ã”å˜çŸ¥ã®æ–¹ã‚‚å¤šã„ã¨æ€ã„ã¾ã™ãŒã€ä»Šå›žã¯ã“ã®XSã®ç°¡å˜ãªåˆ©ç”¨æ–¹æ³•ã‚’ç´¹ä»‹ã—ãŸã„ã¨æ€ã„ã¾ã™ã€‚ ãªãŠXSã¯ã€ã¯ã¦ãªã§ã‚‚ä½¿ç”¨ã—ã¦ã„ã¾ã™ã€‚ ã•ã¦XSãƒ¢ã‚¸ãƒ¥ãƒ¼ãƒ«ã‚’ä½¿ã†ã¨ã†ã‚Œã—ã„äº‹ã¯ Cè¨€èªžã§æ›¸ãã“ã¨ã«ã‚ˆã‚Šã€å‡¦ç†ãŒé«˜é€Ÿã«ãªã‚‹å¯èƒ½æ€§ãŒã‚ã‚‹ æ—¢å˜ã®Cè¨€èªžãƒ©ã‚¤ãƒ–ãƒ©ãƒªè³‡ç”£ã‚’Perlã‹ã‚‰åˆ©ç”¨ã™ã‚‹ã“ã¨ãŒã§ãã‚‹ PerlãŒã‚ã¾ã‚Šå¾—æ„ã§ãªã„ã€ãƒ¡ãƒ¢ãƒªå†…ãªã©ã«å˜åœ¨ã™ã‚‹ãƒ“ãƒƒãƒˆå˜ä½ã§ã®ç´°ã‹ãªãƒ‡ãƒ¼ã‚¿æ§‹é€ ã‚’ã€ã‚ã‚Œã“ã‚Œã§ãã‚‹ ãªã©ãŒæŒ™ã’ã‚‰ã‚Œã‚‹ã¨æ€ã„ã¾ã™ã€‚ ä»Šå›žã¯ã€é«˜é€ŸåŒ–ã«
ku0522 2007/10/02
perl XSå…¥é–€ã¨ã—ã¦æœ€é©ã€‚ã“ã‚Œã¯å‹•ãã¾ã§5åˆ†ã€‚

perl

XS
ãƒªãƒ³ã‚¯
Mozilla::Mechanize
NAME Mozilla::Mechanize - Like WWW::Mechanize but using Gtk2::MozEmbed SYNOPSIS use Mozilla::Mechanize; my $moz = Mozilla::Mechanize->new(); $moz->get( $url ); $moz->follow_link( text => $link_txt ); $moz->form_name( $form_name ); $moz->set_fields( username => 'yourname', password => 'dummy' ); $moz->click( $btn_name ); # Or all in one go: $moz->submit_form( form_name => $form_name, fields => { us
ku0522 2007/08/14
WWW::Mechanize is great, but it has a major shortcoming: it completely ignores JavaScript.

mechanize

perl
ãƒªãƒ³ã‚¯
TokuLog æ”¹ã‚ ã ã¾ã£ã¦ã‚³ãƒ¼ãƒ‰ã‚’æ›¸ã‘ã‚ˆãƒã‚² - è¿‘ä»£çš„ãªãƒ¡ãƒ¼ãƒ«ã®æ·»ä»˜ãƒ•ã‚¡ã‚¤ãƒ«ã‚’ã¨ã‚Šã ã™ãƒ©ã‚¤ãƒ–ãƒ©ãƒª for Perlã€€ã¨ã„ãˆã°ã€€Email::MIME::Attachment::Stripper
Blog Search when-present<#else>when-missing. (These only cover the last step of the expression; to cover the whole expression, use parenthesis: (myOptionalVar.foo)!myDefault, (myOptionalVar.foo)?? ---- ---- FTL stack trace ("~" means nesting-related): - Failed at: ${entry.path} [in template "__entry.ftlh" at line 3, column 25] - Reached through: #include "__entry.ftlh" [in template "entry.ftlh" at
ku0522 2007/08/09
Email::MIME::Attachment::Stripper

perl
ãƒªãƒ³ã‚¯
TokuLog æ”¹ã‚æœ€é©ãªãƒ•ãƒ¬ãƒ¼ãƒ ãƒ¯ãƒ¼ã‚¯ã§å¿«é©ãªãã‚‰ã—ã‚’å‰µé€ ã™ã‚‹ä¼š - Data::Visitor ã‹ã£ã“ã„ã„ã
Blog Search when-present<#else>when-missing. (These only cover the last step of the expression; to cover the whole expression, use parenthesis: (myOptionalVar.foo)!myDefault, (myOptionalVar.foo)?? ---- ---- FTL stack trace ("~" means nesting-related): - Failed at: ${entry.path} [in template "__entry.ftlh" at line 3, column 25] - Reached through: #include "__entry.ftlh" [in template "entry.ftlh" at
ku0522 2007/08/09
perl

algorithm
ãƒªãƒ³ã‚¯
MySQL FULLTEXT Ngram : LIKEæ¤œç´¢ã‚ˆã‚Šæ•°åå€é«˜é€Ÿãªã€ãŠæ‰‹è»½ æ—¥æœ¬èªžå…¨æ–‡æ¤œç´¢ ã«ã¤ã„ã¦ï½œblogï½œãŸãŸã¿ãƒ©ãƒœ
tatamilab.jp
ku0522 2007/08/08
Ngramç”Ÿæˆ window_size = 2 ã ã¨ä½¿ã„ç‰©ã«ãªã‚‰ãªã„ã®ã§ãŠãŠããã™ã‚‹

mysql

PHP

perl

search
ãƒªãƒ³ã‚¯
HTML::StripScriptsã§XSSå¯¾ç–ã‚’ã™ã‚‹ - Kentaro Kuribayashi's blog
å…ˆæ—¥å…¬é–‹ã—ãŸã€Œã¯ã¦â˜†ã™ãŸã‚¢ãƒ³ã‚±ãƒ¼ãƒˆã€ã«ã¦ã€ã‚¢ãƒ³ã‚±ãƒ¼ãƒˆã®èª¬æ˜Žæ–‡ã‚’ã¯ã¦ãªè¨˜æ³•ã§æ›¸ã‘ã‚‹ã‚ˆã†ã€æ©Ÿèƒ½è¿½åŠ ã‚’è¡Œã£ãŸã€‚ãã®éš›ã€Template::Plugin::Hatenaã‚’ç”¨ã„ãŸã€‚ã“ã‚Œã¯ã€ã¯ã¦ãªè¨˜æ³•ãƒ‘ãƒ¼ã‚µã§ã‚ã‚‹Text::Hatenaï¼ˆæ£ç¢ºã«ã¯ã€ãã®ãƒ´ã‚¡ãƒ¼ã‚¸ãƒ§ãƒ³0.16ä»¥ä¸‹ï¼‰ã‚’ã€Template::Toolkitã®ãƒ—ãƒ©ã‚°ã‚¤ãƒ³ã¨ã—ã¦ä½¿ãˆã‚‹ã‚ˆã†ã«ã—ãŸã‚‚ã®ã§ã‚ã‚‹ã€‚ ã¯ã¦ãªè¨˜æ³•ã¯ã€ãã‚Œè‡ªä½“ã§å…¨ã¦ã®æ–‡æ›¸æ§‹é€ ã‚’è¡¨ç¾ã§ãã‚‹ã€ã‚ã‚‹ã„ã¯ã€ã¯ã¦ãªãƒ€ã‚¤ã‚¢ãƒªã®ã‚·ã‚¹ãƒ†ãƒ è‡ªä½“ã¯ã€ã¯ã¦ãªè¨˜æ³•ã®ã¿ã—ã‹è¨±å®¹ã—ãªã„ã¨ã„ã†ã‚‚ã®ã§ã¯ãªãã€ãŸã¨ãˆã°ç”»åƒã‚’è²¼ã‚‹éš›ã«ã¯ã€æ™®é€šã«imgè¦ç´ ã‚’æ›¸ãå¿…è¦ãŒã‚ã‚‹ã—ã€ã¾ãŸã€ãã®ä»–ã®è¦ç´ ã«ã¤ã„ã¦ã‚‚ã€è¨˜æ³•ãŒç”¨æ„ã•ã‚Œã¦ã„ãªã„ã‚‚ã®ã«ã¤ã„ã¦ã¯ã€ã€Œã¯ã¦ãªãƒ€ã‚¤ã‚¢ãƒªãƒ¼ã®ãƒ˜ãƒ«ãƒ— - ã¯ã¦ãªãƒ€ã‚¤ã‚¢ãƒªãƒ¼åˆ©ç”¨å¯èƒ½ã‚¿ã‚°ã€ã«æŽ²è¼‰ã•ã‚Œã¦ã„ã‚‹ã‚‚ã®ã«é™ã‚Šã€è‡ªåˆ†ã§ã‚¿ã‚°ã‚’æ›¸ãã“ã¨ãŒã§ãã‚‹ã€‚ã“ã‚Œã¯è‡ªç”±åº¦ã‚’é«˜ã‚ã‚‹åé¢ã§ã€XSSã‚’èª˜ç™ºã—å¾—ã‚‹æ½œåœ¨çš„ãªãƒª
ku0522 2007/08/05
XSS

perl
ãƒªãƒ³ã‚¯
MP3::Tag::ID3v2
NAME MP3::Tag::ID3v2 - Read / Write ID3v2.x.y tags from mp3 audio files SYNOPSIS MP3::Tag::ID3v2 supports * Reading of ID3v2.2.0 and ID3v2.3.0 tags (some ID3v2.4.0 frames too) * Writing of ID3v2.3.0 tags MP3::Tag::ID3v2 is designed to be called from the MP3::Tag module. If you want to make calls from user code, please consider using highest-level wrapper code in MP3::Tag, such as update_tags() and
ku0522 2007/08/01
mp3

perl
ãƒªãƒ³ã‚¯
XML-XUpdate-LibXML-0.6.0
ku0522 2007/07/13
xupdate - Process XUpdate commands over an XML document

xml

perl
ãƒªãƒ³ã‚¯
æœ€é€Ÿã‚¤ãƒ³ã‚¿ãƒ¼ãƒ•ã‚§ãƒ¼ã‚¹ç ”ç©¶ä¼š :: ãƒãƒƒã‚·ãƒ¥ã‚ãƒ¼ã®å˜åœ¨ãƒã‚§ãƒƒã‚¯ã‚’è¶…é«˜é€Ÿã«çœãƒ¡ãƒ¢ãƒªã§è¡Œã†æ–¹æ³•
ãƒªãƒ³ã‚¯å…ˆã¾ã¨ã‚ã¦ç™»éŒ²ã§ãã‚‹æ©Ÿèƒ½ãŒä»˜ãã¾ã—ãŸã€‚ http://blog.livedoor.jp/staff_reader/archives/51034585.html ã‹ã¨ã‚†ãƒ¼å®¶æ–çµ¶ã‹ã‚‰ãƒªãƒ³ã‚¯å¼µã‚‰ã‚Œã¦ã‚‹ã‚µã‚¤ãƒˆã‚’ã¾ã¨ã‚ã¦ç™»éŒ²ã¨ã‹ http://reader.livedoor.com/subscribe/?url=http%3A%2F%2Fwww6.ocn.ne.jp%2F~katoyuu%2F&extract=on ã‚¹ã‚¿ãƒ¼ãƒˆãƒžãƒƒã‚¯ä½“é¨“ãƒ¢ãƒ‹ã‚¿ã®ãƒ–ãƒã‚°ã‚’ã¾ã¨ã‚ã¦ç™»éŒ²ã¨ã‹ http://reader.livedoor.com/subscribe/?url=http%3A%2F%2Fwww.apple.com%2Fjp%2Farticles%2Fstartmac_monitor_2%2Fwinners.html&extract=on ã§ãã¾ã™ã€‚ ãƒªãƒ³ã‚¯å…ˆã®å…¨ä»¶ã«Auto Discoveryã‚’ã‹ã‘ã‚‹ã¨ã€
ku0522 2007/06/08
Bloom::Filter

tosee

algorithm

perl
ãƒªãƒ³ã‚¯
Mac::Growl - Perl module for registering and sending Growl Notifications on Mac OS X - metacpan.org
ku0522 2007/06/06
growlã®perl interface.

perl

OSX

growl
ãƒªãƒ³ã‚¯
Encode-Punycode-1.002
ku0522 2007/06/06
å›½éš›åŒ–ãƒ‰ãƒ¡ã‚¤ãƒ³ã®ã‚¨ãƒ³ã‚³ãƒ¼ãƒ‡ã‚£ãƒ³ã‚°ã‚’ã‚ã¤ã‹ã†ã€‚

perl

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

OSX

tosee
ãƒªãƒ³ã‚¯
Encodeãƒ¢ã‚¸ãƒ¥ãƒ¼ãƒ«ã§ã®MIME Encode - [ã´](2006-12-15)
_ [Perl] Encodeãƒ¢ã‚¸ãƒ¥ãƒ¼ãƒ«ã§ã®MIME Encode Encodeãƒ¢ã‚¸ãƒ¥ãƒ¼ãƒ«ã§æ–‡å—ã‚³ãƒ¼ãƒ‰ã®å¤‰æ›ãŒã§ãã‚‹ãŒã€MIMEã‚¨ãƒ³ã‚³ãƒ¼ãƒ‰ã‚’ã™ã‚‹ã«ã¯ä»¥ä¸‹ã®ã‚ˆã†ã«ã™ã‚Œã°ã‚ˆã„ã€‚ use Encode; encode('MIME-Header-ISO_2022_JP', $subject) [Encodeãƒ¢ã‚¸ãƒ¥ãƒ¼ãƒ«ã§ã®MIME Encodeã‚ˆã‚Šå¼•ç”¨] ãã†ã ã£ãŸãƒŽã‚«ãƒ¼ C:\> perl -MEncode -e "print encode('MIME-Header-ISO_2022_JP', decode('cp932', 'ãƒ†ã‚¹ãƒˆ'))" =?ISO-2022-JP?B?GyRCJUYlOSVIGyhC?= ã†ã‚“ã€‚ C:\> perl -MEncode -e "print encode('MIME-Header-ISO_2022_JP', decode('cp932', 'ä¸»äººãŒã‚ªã‚ªã‚¢ãƒªã‚¯ã‚¤ã«
ku0522 2007/05/21
ãƒ¡ãƒ¼ãƒ«ãƒ˜ãƒƒãƒ€ã®MIMEã‚¨ãƒ³ã‚³ãƒ¼ãƒ‰ã€‚

perl

utf8
ãƒªãƒ³ã‚¯
1 2 æ¬¡ã®ãƒšãƒ¼ã‚¸