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

zhuomingliang

原帖由 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误解。

[ 本帖最后由 zhuomingliang 于 2007-12-17 15:39 编辑 ]

perl2008

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

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


#!/usr/bin/perl


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

#!/usr/bin/perl


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

你在比喻你自己吗?

zhuomingliang

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

你在比喻你自己吗?

你不觉得你很无理么。

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

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

[ 本帖最后由 zhuomingliang 于 2007-12-17 16:03 编辑 ]

perl2008

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

你不觉得你很无理么。

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

sorry, 俺错了

lvlfforever

有意思，我也关注一下。

perljoker

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

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

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

而是 ...

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

并且，退10000步说，你原帖子里面：

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


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

5.8.8下测试通过.

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

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

zhuomingliang

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

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

我只能引用一句话了：

我老婆长的漂亮不漂亮该穿什么不是你说了算（当然，你有提供建议的权利），是我说了算

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

5.8.8下测试通过.

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

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

perljoker

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

我只能引用一句话了：



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

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

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

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

1. ]$ perl -we '
   
2. my $var1 = "cc";
   
3. my $var2 = "${var1}{string}";
   
4. print "$var2\n";
   
5. '
   
6. cc{string}
   

复制代码

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

zhuomingliang

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

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

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

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

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

[ 本帖最后由 zhuomingliang 于 2007-12-18 10:28 编辑 ]

ly5066113

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

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

想知道哪个版本的perl会误解，可否高知？