能不能用perl把字串转化为ReExp?

能不能用perl把字串转化为ReExp?
各位爱好per的朋友，大家好。
我想使用perl把我的数据库中的字串转化为regular expression.
不知道这种应用对于perl来说是不是很方便。除了perl,我是不是还需要看看编译原理的东西啊。

p.s.我不是cs出身,完全是业余水平，但是工作中需要用到（ic设计）。我觉得perl应该是我一直在寻找的那种好用不难的工具，所以麻烦大家给点指点了，鞠躬了。

[quote]--$exp='\w+(\d{.
[quote]
$exp='\w+(\d{4})';
$string='aaa1985';
$string=~ m/$exp/g;
print $1; #打印出 1985
[/quote]
可以啊,如上例,你可以把数据库中用来做匹配模式得字串读出来赋给$exp.