746572e280a62ee280... becomes 746572c3a2c280c2a6... #### for(keys %$row){utf8::decode($row->{$_}) if utf8::is_utf8($row->{$_})} #### CREATE TABLE `host_MyApp_DUFs` ( `DUF_id` bigint(20) unsigned NOT NULL AUTO_INCREMENT, `member_id` bigint(20) unsigned NOT NULL COMMENT '', `install_id` tinyint(1) unsigned NOT NULL COMMENT '', `job_id` int(12) unsigned NOT NULL DEFAULT '0' COMMENT '', `content` longtext COLLATE utf8_unicode_ci COMMENT '', `token_id` bigint(20) unsigned DEFAULT NULL COMMENT 'links to `host_MyApp_tokens`', PRIMARY KEY (`member_id`,`install_id`,`job_id`,`DUF_id`), UNIQUE KEY `token_id` (`token_id`), KEY `DUF_id` (`DUF_id`) ) ENGINE=InnoDB AUTO_INCREMENT=406 DEFAULT CHARSET=utf8 COLLATE=utf8_unicode_ci COMMENT=''; /*!40101 SET character_set_client = @saved_cs_client */; #### my $dbix = DBIx::Lite-> connect( "dbi:mysql:dbname=$ENV{DB_NAME}", $ENV{DB_USER}, $ENV{DB_PASSWORD}, { mysql_enable_utf8 => 1 } ); #### DB<6> x $st->fetchrow 0 'character_set_client' 1 'utf8' DB<7> x $st->fetchrow 0 'character_set_connection' 1 'utf8' DB<8> x $st->fetchrow 0 'character_set_database' 1 'utf8' DB<9> x $st->fetchrow 0 'character_set_filesystem' 1 'utf8' DB<10> x $st->fetchrow 0 'character_set_results' 1 'utf8' DB<11> x $st->fetchrow 0 'character_set_server' 1 'utf8' DB<12> x $st->fetchrow 0 'character_set_system' 1 'utf8' DB<13> x $st->fetchrow 0 'character_sets_dir' 1 '/usr/share/mysql/charsets/' #### 746572e280a62ee280... becomes 746572c3a2c280c2a6...