--- MoCo.pm.orig 2008-06-04 07:03:18.000000000 +0900 +++ MoCo.pm 2008-11-24 12:25:12.000000000 +0900 @@ -255,6 +255,7 @@ sub db_object { my $class = shift; if (my $db = shift) { + $db->require or die $@; + $db->execute('set names utf8'); $…