如何用正则提取中文字符？

如何用正则提取中文字符？
#!/usr/bin/perl
$d = '我是汉字 asdfasdf' ;
$d =~ /(.*?)\t+[a-z0-9]*/i ;
print $1 ;#$1中就是'我是汉字'
这个方法不行
那位知道可行的方法啊？？
谢谢了