|
楼主 |
发表于 2009-7-29 15:11:28
|
显示全部楼层
谢谢楼上回复.
可能问得不大清楚,
试试看再写个例子.
目的就是要定义个数组,里面 有常量有变量, 然后在子函数里面要重新给数组里面那个变量附值,再调用这个数组.单纯是变量的话,使用赋地址的方法可以实现:
my $var="abc";
my @xyz=(\$var);
print "${$xyz[0]}\n";
&x;
sub x{
$var="123";
print "${$xyz[0]}\n";
}
但是常量和变量放在一起好像就有点问题..
my $var="abc";
my @xyz=("edf\\$var");
print "$xyz[0]\n";
&x;
sub x{
$var="123";
print "$xyz[0]\n";
} |
|