作者kornelius (c9s)
看板Perl
标题Re: [问题] 问一些程式的问题
时间Sun Jul 26 14:40:13 2009
※ 引述《cibs (0)》之铭言:
: 我想应该是我说的不够完整,如果 $variable 里面存的是 array reference 的话,
: 的确如你所述。
: 但是如果 $variable 里面存的是像 var 这样的字串的话,作的应该是 symbolic
: reference 的 dereference, 也就是如我所说。
: 有错请指正。
:)
那麽这样的话,要
no strict 'refs'; # allow symbol table manipulation
local *refv = $array_referecne;
my $variable = 'refv';
push @$variable , '123';
--
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 113.61.194.203
1F:→ cibs:5.10.0 default 就可以用了耶 @_@ 不用 no strict 'refs' 07/26 23:57
2F:→ cibs:under MacOSX 07/26 23:58
3F:→ kornelius:因为我平常习惯都 use strict; use warnings; 所以 07/27 11:18
4F:→ kornelius:那个 block 不 strict 'refs' 会另外宣告。 07/27 11:19
5F:→ kornelius:5.8, 5.9 default 一定可用,因为没有 strict,warnings 07/27 11:19
6F:→ kornelius::) 07/27 11:19
7F:→ kornelius:补: 5.8,9,10 07/27 11:20