2010-03-01ãã1ã¶æéã®è¨äºä¸è¦§
Unicode::Japanese æåã³ã¼ããèªåå¤å¥ããã®ã« Encode::Guessï¼Jcodeã§è¡ã£ã¦ããã®ã§ããã ãã®ã¢ã¸ã¥ã¼ã«ä½¿ãã¨ããããªãã¸ãã¯ã§å¤å¥ãã¦ããããã ãããªæãããªã use Unicode::Japanese; my $s = Unicode::Japanese->new(); my $code = $s->getâ¦
Catalystã§crudæä¾ããã¢ã¸ã¥ã¼ã«ä½ãããããªã¼ã¨æ¢ãã¦ãã http://dev.catalystframework.org/wiki/crudãã®ãã¼ã¸ã®ã¢ã¸ã¥ã¼ã«åããããæ軽ã«å®è£ åºæ¥ãããªCatalyst::Plugin::AutoCRUDã試ãã¦ã¿ãã ã¤ã³ã¹ãã¼ã« cpan Catalyst::Plugin::AutoCRUDâ¦
ModPerl::PerlRunã¨ãã¦å®è¡ãã¦ããcgiã¹ã¯ãªãããããã®ã§ããã ããªãã ã®DBD::Pgéåæ対å¿ãããprototype mismatchãã¨ã©ã¼ãã°ã«ããããåºã¾ãã£ã¦ããã*1 Prototype mismatch: sub ModPerl::ROOT::ModPerl::PerlRun::hoge_2excgi::PG_OLDQUERY_Câ¦
æ¹æ³ãæãã¦ããã ãã¾ããã 以ä¸ãé©å½ãªcgiããå®è¡ããã°ãï½*1 #!/usr/bin/perl use CGI; my $cgi = new CGI; print $cgi->header; print Dumper(\%INC); ãã°ããã *1:ModPerl::Registryã§åãcgi
ããªç§åä½ã®sleep㯠ï¼å¼æ°select ã使ãæ¹æ³ã¨ Time::HiRes ã使ãæ¹æ³ããããã©ãTime::HiRes::sleepã®æ¹ãããã®ããªï¼ ãªããªããselectã使ã£ãã Perl::Criticã§æãããããã t/perlcritic.t ......... 15/20 # Failed test 'Test::Perl::Critic fâ¦