大虾们给解释一下吧！！！

[marmot]

sub d{};
eval(q[sub d {print "<$_[0]>";}]) ;
print "asd";
d(1);
d(2);
sub是一个空函数，可是加上第二句就会打印出括号的东西。
请问eval和括号理的q[]是什么意思啊

[lgjut]

eval用于动态执行给它的脚本。给它一个字符串，它会执行其中的语句。
q[] 代表字符串，和单引号括起来是一样的。