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

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

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

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