[B! dbic] koko1000banã®ãƒ–ãƒƒã‚¯ãƒžãƒ¼ã‚¯

koko1000ban id:koko1000ban

é–¢é€£ã‚¿ã‚°ã§çµžã‚Šè¾¼ã‚€ (6)

ã‚¿ã‚°ã®çµžã‚Šè¾¼ã¿ã‚’è§£é™¤

dbicã«é–¢ã™ã‚‹koko1000banã®ãƒ–ãƒƒã‚¯ãƒžãƒ¼ã‚¯ (6)

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

ã©ã‚“ãžã“æ—¥èªŒ(2009-09-18) - YAPC::Asiaç‰¹åˆ¥ç ”ä¿®ã«ã„ã£ã¦ãã¾ã—ãŸ
* [Perl][è¿‘æ³] YAPC::Asiaç‰¹åˆ¥ç ”ä¿®ã«ã„ã£ã¦ãã¾ã—ãŸ YAPC::Asiaç‰¹åˆ¥ç ”ä¿®ã®DBIX::Classã¨MySQLã«ã‚ˆã‚‹Perlã‚¢ãƒ—ãƒªã‚±ãƒ¼ã‚·ãƒ§ãƒ³ã®ã‚¹ã‚±ãƒ¼ãƒªãƒ³ã‚°è¡“ï¼ˆè¬›å¸«ï¼šJohn Napiorkowskiã•ã‚“ï¼‰ã«å‚åŠ ã—ã¾ã—ãŸã€‚ åˆå‰ä¸ã¯DBIx::Classé–¢é€£ã¨ã‚¹ã‚±ãƒ¼ãƒªãƒ³ã‚°ã€ãƒ‘ãƒ•ã‚©ãƒ¼ãƒžãƒ³ã‚¹å‘ä¸Šã®ãŸã‚ã®æŠ€è¡“ã®ç´¹ä»‹ã€‚ã¾ãšæœ€åˆã«ã‚«ãƒ¼ãƒ‰ã®å±±ã‹ã‚‰ç‰¹å®šã®ã‚‚ã®ã‚’å–ã‚Šå‡ºã™ä½œæ¥ã‚’é€šã˜ã¦ã€ä¸€äººã‚ˆã‚Šæ•°äººåŒæ™‚ãŒã€æ•°äººåŒæ™‚ã‚ˆã‚Šäºˆã‚indexã—ãŸæ–¹ãŒæ—©ã„ã¨ã„ã†ã“ã¨ã‚’ä½“é¨“ã€‚â†’ã—ã‹ã—ãã®å¾Œã®è©±ã«ã¯çµ¡ã¾ãªã„ã€‚ è©±ã¯çµæ§‹è¡Œãã¤æˆ»ã‚Šã¤ã§ã€ã‚ã¾ã‚Šä½“ç³»ã ã£ã¦ã¯ã„ãªã‹ã£ãŸã®ã§ã€å¤§é›‘æŠŠã«ã¾ã¨ã‚ã‚‹ã¨ï¼š DBICã¨ã‹SQLé–¢é€£ DBICãŒåãSQLã¯é…ã„ä»¶ã«ã¤ã„ã¦â†’æœ€è¿‘ã¯ã‹ãªã‚Šè‰¯ããªã£ã¦ãã¦ã„ã‚‹ è¤‡é›‘ãªjoinã‚‚å¯èƒ½ã€‚ãƒ‰ã‚ãƒ¥ãƒ¡ãƒ³ãƒˆã€tãƒ‡ã‚£ãƒ¬ã‚¯ãƒˆãƒªå‚ç…§ã€‚ DBIC_TRACE=1ã¯å‹é”ã€‚å®Ÿè¡ŒSQLå…¨éƒ¨åã‹ã›ã‚‹ã€‚ã•ã‚‰ã«1
koko1000ban 2009/09/19
perl

yapcasia2009

dbic
ãƒªãƒ³ã‚¯
éžåŒæœŸã§æµã—ãŸã‚¯ã‚¨ãƒªã‚’ã»ã’ã»ã’ã™ã‚‹PoCo - D-6 [ç›¸å¤‰ã‚ã‚‰ãšæ ¹ç„¡ã—]
éžåŒæœŸã§æµã—ãŸã‚¯ã‚¨ãƒªã‚’ã»ã’ã»ã’ã™ã‚‹PoCo å°‘ã—ãšã¤æ¡ä»¶ãŒé•ã†ã‚¯ã‚¨ãƒªã‚’è¤‡æ•°éžåŒæœŸã§æŠ•ã’ã¦ã€é›†ç´„ã™ã‚‹ãƒ¢ã‚¸ãƒ¥ãƒ¼ãƒ«ã‚’æ›¸ã„ã¦ã¿ãŸã‚“ã ã‘ã©ã€åå‰ã¨ã‹ãŒã‚¤ãƒžã‚¤ãƒæ±ºã¾ã‚‰ãªã„ã€‚ãªã‚“ã‹ã„ã„ã‚¢ã‚¤ãƒ‡ã‚¢ã‚ã‚Šã¾ã™ã‹ãã‡ã€‚ãã‚Œã¨ã‚‚ã“ã‚Œã£ã¦ä½¿ã†æ¡ä»¶ãŒç‰¹æ®Šã™ãŽã¦ãƒ¢ã‚¸ãƒ¥ãƒ¼ãƒ«ã«ã™ã‚‹ã«ã¯ã‚¢ãƒ¬ã‹ãªã€‚ä¸€å¿œã“ã‚Œã‚’ãƒ™ãƒ¼ã‚¹ã«ã—ã¦ã€PoCo::Server::TCPã¿ãŸã„ãªã®ã¨ã¤ãªã’ã¦æ¤œç´¢ã‚µãƒ¼ãƒãƒ¼ã«ã—ãŸã¦ã‚ã’ã‚ˆã†ã¨æ€ã£ã¦ã‚‹ã‚“ã ã‘ã©ã€‚ ä½¿ã„æ–¹ã¯ã“ã‚“ãªæ„Ÿã˜ # initialize... POE::Component::MultiDB::DBIC->spawn( Alias => $alias, ConnectInfo => [ .... ], SchemaClass => 'MyApp::Schema' ); # some where else... $_[KERNEL]->post( $alias, 'search_multi', { a
koko1000ban 2009/09/18
perl

dbic
ãƒªãƒ³ã‚¯
YAPC::Asia 2009 ç‰¹åˆ¥ç ”ä¿® - Moose å…¥é–€
å…ˆé€±æœ«ã® YAPC::Asia 2009 ã®ã‚«ãƒ³ãƒ•ã‚¡ãƒ¬ãƒ³ã‚¹ã«å¼•ãç¶šãã€ç‰¹åˆ¥ç ”ä¿®ã€ŽMooseå…¥é–€ã€ãƒ¢ãƒ€ãƒ¼ãƒ³ãªã‚ªãƒ–ã‚¸ã‚§ã‚¯ãƒˆæŒ‡å‘ã‚·ã‚¹ãƒ†ãƒ ã€ã«å‚åŠ ã—ã¦ããŸã€‚ ç ”ä¿®ã®å†…å®¹ã¯ã€Moose ã¨ã¯ãªã‚“ãžã‚„ã‹ã‚‰å§‹ã¾ã‚Šã€ä»¥ä¸‹ï¼ˆã ã„ãŸã„ï¼‰7 éƒ¨æ§‹æˆã®å…¥é–€è¬›åº§ã€‚ Moose Concepts : ã‚³ãƒ³ã‚»ãƒ—ãƒˆ ã–ã£ã¨æ©Ÿèƒ½ä¸€é€šã‚Šã¿ã¦ã¿ã‚‹ ãªãœ Moose ãªã®ã‹ Classes : Class ã®åŸºç¤Žã‹ã‚‰ä½¿ã„æ–¹ Moose::Object ãŒä½•æŒã£ã¦ã‚‹ã‹ã¨ã‹ BUIDLARGS, extends, override, super ã®ä½¿ã„æ–¹ Moose ä½¿ã£ãŸã‚ã¨ã®å¾Œå§‹æœ« (no Moose;) Role : Role ã®åŸºç¤Žã‹ã‚‰ä½¿ã„ã‹ãŸ Role ã®æŒã¤æ„å‘³ ä½¿ã„æ–¹ alias ã§è¡çªå›žé¿ Basic Attributes : Attribute ã„ã‚ã„ã‚ required, default/builder, laz
koko1000ban 2009/09/15
perl

yapcasia2009

moose
ãƒªãƒ³ã‚¯
DBIx::Class - Japan Perl Association Wiki
ãƒˆãƒ¬ãƒ¼ã‚¹ DBIx::Classã§è¤‡é›‘ãªã‚¯ã‚¨ãƒªã‚’è¡Œã£ã¦ã„ã‚‹å ´åˆã€å®Ÿéš›ã«ç™ºè¡Œã•ã‚Œã¦ã„ã‚‹ã‚¯ã‚¨ãƒªã‚’ã¿ã‚‹å¿…è¦ãŒã‚ã‚‹å ´åˆãŒã‚ã‚Šã¾ã™ã€‚ãã®ã‚ˆã†ãªå ´åˆã¯ç’°å¢ƒå¤‰æ•°DBIC_TRACEã‚’è¨å®šã—ã¦ã‚¹ã‚¯ãƒªãƒ—ãƒˆã‚’å®Ÿè¡Œã™ã‚‹ã¨å®Ÿè¡Œã•ã‚Œã¦ã„ã‚‹ã‚¯ã‚¨ãƒªã‚’ã¿ã‚‹ã“ã¨ãŒã§ãã¾ã™ï¼š DBIC_TRACE=1Â myscript.pl ã‚¯ã‚¨ãƒªãŒå¤šãã¦ä¸€åº¦ã«è¿½ã†ã®ãŒé›£ã—ã„å ´åˆã¯ã“ã®å‡ºåŠ›ã‚’ãƒ•ã‚¡ã‚¤ãƒ«ã«å‘ã‘ã‚‹ã“ã¨ã‚‚ã§ãã¾ã™ã€‚ DBIC_TRACE=1=/path/to/query.logÂ myscript.pl ãƒˆãƒ©ãƒ³ã‚¶ã‚¯ã‚·ãƒ§ãƒ³ DBIx::Class 0.08100ä»¥ä¸Šã‚’ãŠä½¿ã„ã§ã‚ã‚Œã°ã€æ˜Žç¤ºçš„ã«ä½•ã‚‚æŒ‡å®šã—ãªãã¦ã‚‚DBIx::Class::Storage::TxnScopeGuardã‚’ä½¿ç”¨ã™ã‚‹ã“ã¨ãŒã§ãã¾ã™ã€‚ #!/usr/bin/perl useÂ strict; useÂ MyApp::Schema; myÂ $schemaÂ =Â MyApp::
koko1000ban 2009/07/04
perl

dbic

cpan
ãƒªãƒ³ã‚¯
namespaceã‚’ä½¿ã£ãŸDBIx::Classã®ã‚¹ã‚ãƒ¼ãƒžæ§‹æˆ - hide-k.net#blog
è‰¯ãã‚ã‚‹DBICã®ã‚µãƒ³ãƒ—ãƒ«ã§ã¯DBIx::Class::Schema::load_classes()ã‚’ä½¿ã£ã¦ã‚¯ãƒ©ã‚¹ã®ãƒãƒ¼ãƒ‰ã‚’è¡Œã£ã¦ã„ã¾ã™ã€‚ CD.pm package CD; use strict; use warnings; use base 'DBIx::Class::Schema'; __PACKAGE__->load_classes; 1; load_classes()ã¯ã‚¯ãƒ©ã‚¹ã‚’æŒ‡å®šã—ãªã„ã¨ CD Album Track ã¨ã„ã†æ§‹æˆã«ãŠã„ã¦è‡ªå‹•çš„ã«ã‚¯ãƒ©ã‚¹ã‚’ãƒãƒ¼ãƒ‰ã™ã‚‹ã“ã¨ãŒã§ãã¾ã™ã€‚ ã“ã“ã§ResultSetã®æ‹¡å¼µã‚’ã—ãŸã„ã¨è€ƒãˆã¾ã™ã€‚ä¾‹ãˆã° CD/ResultSet/Album.pm package CD::ResultSet::Album; use strict; use warnings; use base 'DBIx::Class::ResultSet'; sub search
koko1000ban 2009/06/03
perl

dbic
ãƒªãƒ³ã‚¯
tokuhirom blog
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
koko1000ban 2009/04/09
perl

db

dbic
ãƒªãƒ³ã‚¯
1