perl中文乱码问题,请求帮助,(内附源码)

perl中文乱码问题,请求帮助,(内附源码)
[quote]
#!c:/perl/bin/perl
use strict;
use warnings;
use DBI;

my $dbh;
my $id='NULL';
$dbh=DBI->connect('DBI:mysql:b',"$dbname","$dbpasswd") or die "Can't open Mysql";

my $rows;
my $title='Perl转化成utf-8格式的方法';
$rows=$dbh->do("INSERT INTO threads (id,msg) VALUES ($id,$title)");
[/quote]

程序无错,但是存入的中文全部都是乱码了,请问下该怎么解决.
MySQL - 5.0.18-nt
MySQL 字符集: UTF-8 Unicode (utf

另外我想请教下,perl默认写入中文是以什么格式写入mysql的, 谢谢

----------尝试过:
加入:
use Encode;

my $title='Perl转化成utf-8格式的方法';
$title=encode("utf-8",decode("Gb2312",$title));

问题依旧,

   

这是你MYSQL服务去设置的问题
要就是修改MYSQL，要就是每次执行SQL之前执行SET NAMES UTF8（只对4.1.0以上版本）

看这个[url=http://perlch.
看这个[url=http://perlchina.sun126.com/cgi-bin/ccb/topic_view.cgi?forum=5&article_id=0005070112194658&publishtime_id=0005070112194658&page=40][color=red]帖子[/color][/url]。