请教perl变量命名的问题

yashirolj

想要实现这样的效果，在定义变量时在变量名中包含另一个变量，如：
for (1..3) {
    my $var.$_ = $_;
}
这里想要定义三个变量var1、var2、var3，但是不知道该怎么写，请大家指教，多谢

DQP

在我刚学编程时我也被这个问题困扰过 呵呵
但仔细想想 这个问题没什么意义。
我想你需要的是一个数组 my @var = (1..3)  
或是一个hash %var = ('1' => 1, '2' => 2)

yashirolj

多谢DQP，你说的的确是一个解决问题的办法。

其实深究这个问题也许是没有多大实际意义的，但是我只是想知道perl在命名变量的时候有没有这种用法，呵呵

至少这样命名的时候可以省掉了1个数组或hash的开销

ynchnluiti

原帖由 yashirolj 于 2009-1-23 10:53 发表
多谢DQP，你说的的确是一个解决问题的办法。

其实深究这个问题也许是没有多大实际意义的，但是我只是想知道perl在命名变量的时候有没有这种用法，呵呵

至少这样命名的时候可以省掉了1个数组或hash的开销

1. 
   
2. #!/usr/bin/perl
   
3. 
   
4. for (1..3) {
   
5.     my $name="var$_";
   
6.     $$name = $_;
   
7. }
   
8. 
   
9. print "\$var2 = $var2\n";
   

复制代码

DQP

哦 这样啊
那我多事了

DQP

呵呵 这倒是个办法 不错不错

MMMIX

原帖由 yashirolj 于 2009-1-23 10:53 发表
多谢DQP，你说的的确是一个解决问题的办法。

其实深究这个问题也许是没有多大实际意义的，但是我只是想知道perl在命名变量的时候有没有这种用法，呵呵

至少这样命名的时候可以省掉了1个数组或hash的开销

Perl 的 array/hash 的开销没有你想的那么大，而 scalar 的开销也没有你想的那么小。

We should forget about small efficiencies, say about 97% of the time: premature optimization is the root of all evil.  -- Knuth

yashirolj

多谢ynchnluiti，明白了

这样做其实还是多了一个中间环节，也就是说在命名变量的时候其实是没办法直接就修改变量名的吗？

呵呵，有点较真了

ynchnluiti

原帖由 DQP 于 2009-1-23 11:10 发表
呵呵 这倒是个办法 不错不错

符号引用。最好不这么干

MMMIX

原帖由 ynchnluiti 于 2009-1-23 11:01 发表


#!/usr/bin/perl

for (1..3) {
    my $name="var$_";
    $$name = $_;
}

print "\$var2 = $var2\n";

使用全局变量，在绝大多数情况下都不是什么好主意。