Kazuho@Cybozu Labs: Perl ã®ãƒ†ã‚¹ãƒˆç”¨ã« PostgreSQL ã®ã‚¤ãƒ³ã‚¹ã‚¿ãƒ³ã‚¹ã‚’自動ã§æ§‹ç¯‰ã™ã‚‹ãƒ¢ã‚¸ãƒ¥ãƒ¼ãƒ« Test::postgresql を書ã„ãŸä»¥å‰ä½œæˆã—㟠Test::mysqld (å‚ç…§:Perl ã®ãƒ†ã‚¹ãƒˆç”¨ã« MySQL 環境を自動ã§æ§‹ç¯‰ã™ã‚‹ãƒ¢ã‚¸ãƒ¥ãƒ¼ãƒ« Test::mysqld を書ã„ãŸ) ã®å§‰å¦¹ç‰ˆã€Test::postgresql を書ãã¾ã—ãŸã€‚ã“ã®ãƒ¢ã‚¸ãƒ¥ãƒ¼ãƒ«ã‚’使ãˆã°ã€ãƒ†ã‚¹ãƒˆã‚³ãƒ¼ãƒ‰å†…ã§ä¸€æ™‚çš„ã«ãƒ†ã‚¹ãƒˆå°‚用㮠PostgreSQL ã®ã‚¤ãƒ³ã‚¹ã‚¿ãƒ³ã‚¹ã‚’構築ã—ã€ãƒ†ã‚¹ãƒˆã‚’実行ã™ã‚‹ã“ã¨ãŒã§ãã¾ã™ã€‚構築ã•ã‚ŒãŸã‚¤ãƒ³ã‚¹ã‚¿ãƒ³ã‚¹ã¯ã€ãƒ†ã‚¹ãƒˆçµ‚了時ã«è‡ªå‹•çš„ã«å‰Šé™¤ã•ã‚Œã¾ã™ã€‚ use DBI; use Test::postgresql; use Test::More; my $pgsql = Test::postgresql->new( initdb_args => $Test::postgresql::Defaults{initdb_args} . ' --encoding=utf8', ) or plan skip_all => $Test::pos
{{#tags}}- {{label}}
{{/tags}}