perl问题请教

请问下我有个变量里面的内容是一段perl的语句,我要如何把这个变量里的内容执行出来的结果赋值给另外一个变量?
如:
$file_name=“AABBCCDDEEFF_2011031107”
my $test1="substr($file_name,13,";
?my $test2=$test1;

我test1的内容是从数据库里读取出来的,我需要取到test1执行后的结果赋值给test2。

作者: 5579805   发布时间: 2011-05-20

有哪位大虾知道怎么弄的吗?

作者: 5579805   发布时间: 2011-05-20

$test2 = eval $test1

作者: zhlong8   发布时间: 2011-05-20

谢谢谢谢 太感谢楼上了,问题解决了

作者: 5579805   发布时间: 2011-05-20