在perl中如何使用变量名访问变量



QUOTE:
原帖由 flw 于 2007-12-17 15:02 发表

我现在恰恰不明白的是,我不知道你说的“不整齐”、“不好看”的是怎样写?

我再强调一遍:
匪我求童蒙,乃童蒙求我,初筮告,再三渎,渎则不告。
直白一点就是:你爱说清楚不说清楚,你说清楚了,我兴许 ...

my $var1 = 'cc';
my $var2 = $var1 . '{string}' ;
my $var3 = "ddf";
.........................

在这样一堆变量定义里面,我认为偶尔出现一个用.连接不大美观(当然,你可能并不这么认为)。

而是希望

my $var1 = 'cc';
my $var2 = "${var1}{string}";
my $var3 = "ddf";
........................


但是语句my $var2 = "${var1}{string}" 这样的写法会让perl 导致误解,我希望保持风格而不让perl误解。



QUOTE:
原帖由 zhuomingliang 于 2007-12-17 15:03 发表

抬头看置顶,找到Perl 语言编程 电子书下载, 找到引用一章,多多看看


#!/usr/bin/perl


$pig = 'pig';
print $$pig;

#!/usr/bin/perl


$var = 'pig';
print ${'var'};

你在比喻你自己吗?


QUOTE:
原帖由 perl2008 于 2007-12-17 15:59 发表

你在比喻你自己吗?

你不觉得你很无理么。

$var = 'pig';
你的名字是var 么?
如果你要厚着脸皮承认的话,我也没有办法。

如果我写了$perl2008 = 'pig';
真不知道我能活到什么时候。



QUOTE:
原帖由 zhuomingliang 于 2007-12-17 16:01 发表

你不觉得你很无理么。

$var = 'pig';
你的名字是var 么?
如果你要厚着脸皮承认的话,我也没有办法。

sorry, 俺错了
有意思,我也关注一下。


QUOTE:
原帖由 zhuomingliang 于 2007-12-17 15:37 发表

my $var1 = 'cc';
my $var2 = $var1 . '{string}' ;
my $var3 = "ddf";
.........................

在这样一堆变量定义里面,我认为偶尔出现一个用.连接不大美观(当然,你可能并不这么认为)。

而是 ...

Orz,真的很拜倒,我看了也不觉得第二种比第一种要美观和整齐,只用一对单引号或者双引号就算“风格”了?
你不用第一种确实没什么理由,如果写程序都像你这么说,保持自己怪异的风格,这才叫失去可读性
当然了,你可以自己发明一套语言,那个风格,你完全可以自己定

并且,退10000步说,你原帖子里面:

QUOTE:
原帖由 Lonki 于 2007-11-15 19:53 发表


你真的确定这样会让Perl误会整体是变量? 而不是因为你少打了一个1?

5.8.8下测试通过.

都说能通过了,还是你不信lonki他们的测试结果啊
还有,想让perl不误解你的意思,你就别写会让他误解的句子

ps。真的哦,每日一帖符号引用,汗……


QUOTE:
原帖由 perljoker 于 2007-12-17 16:46 发表

Orz,真的很拜倒,我看了也不觉得第二种比第一种要美观和整齐,只用一对单引号或者双引号就算“风格”了?
你不用第一种确实没什么理由,如果写程序都像你这么说,保持自己怪异的风格,这才叫失去可读性
当 ...

我只能引用一句话了:

QUOTE:
我老婆长的漂亮不漂亮该穿什么不是你说了算(当然,你有提供建议的权利),是我说了算



QUOTE:
你真的确定这样会让Perl误会整体是变量? 而不是因为你少打了一个1?

5.8.8下测试通过.

是的,是少打了一个1,很明星

他通过的是在少打了一个1 的情况下,明显不符合我的原意。


QUOTE:
原帖由 zhuomingliang 于 2007-12-17 17:00 发表

我只能引用一句话了:



是的,是少打了一个1,很明星

他通过的是在少打了一个1 的情况下,明显不符合我的原意。

我明白你的意思,Lonki也明白你的意思,flw也知道你的意思,而你缺不理解我们
我甚至感到羞辱

不是说你觉得美不美观,而是“你认为美观的前提下”,会导致很多问题,看我原帖写的,多的不说了
还有,你认为别人少打一个1,明明是别人指出你少打一个1,导致你出问题,你咋就是不明白
最后给你我这里的测试结果:

[Copy to clipboard] [ - ]
CODE:
]$ perl -we '
my $var1 = "cc";
my $var2 = "${var1}{string}";
print "$var2\n";
'
cc{string}

当一个人总认为自己是对的时候,别人说什么都听不进去的,多说无益,你自己看着办吧


QUOTE:
原帖由 perljoker 于 2007-12-18 09:21 发表

我明白你的意思,Lonki也明白你的意思,flw也知道你的意思,而你缺不理解我们
我甚至感到羞辱

不是说你觉得美不美观,而是“你认为美观的前提下”,会导致很多问题,看我原帖写的,多的不说了
还有,你认 ...

时间这么长,我无法做到让这个误解重现了。
那个帖子的代码是个简单描述的(你可以当成是‘伪代码’,或者说是形式上的代码),并不是原生代码。旨在获取其它写法,没想到你竟然一而再,再而三试图证明这个代码perl不会误解。

我这里强调一下,不要再去证明这个代码perl不会误解了,这个并不是我原来的代码,只是描述代码。同时恳求其它写法



QUOTE:
原帖由 zhuomingliang 于 2007-12-18 10:24 发表

时间这么长,我无法做到让这个误解重现了。
那个帖子的代码是个简单描述的(你可以当成是‘伪代码’,或者说是形式上的代码),并不是原生代码。旨在获取其它写法,没想到你竟然一而再,再而三试图证明这个代 ...

想知道哪个版本的perl会误解,可否高知?