>The regexp is correct. The problem is your string. Use single 
>quote instead of double quote, to avoid interpolation.

Yes, I got it, Now I use single quote to make it happy, and I 
want to know what's really means as to \w in perl, do it 
include @ ! or not?

Thanks for the info.