神奇的substr左值用法

黑色阳光_cu

1. #!/bin/env perl
   
2. 
   
3. use strict;
   
4. use warnings;
   
5. 
   
6. my $str = "abcdefg";
   
7. *front = \substr($str, 0, 1);
   
8. *rear = \substr($str, -1, 1);
   
9. our ($front, $rear);
   
10. 
    
11. print "str: $str\n";
    
12. print "front: $front    rear: $rear\n";
    
13. 
    
14. $front = 1;
    
15. $rear = 2;
    
16. print "str: $str\n";
    
17. print "front: $front    rear: $rear\n";
    
18. 
    
19. $str = "new string";
    
20. print "str: $str\n";
    
21. print "front: $front    rear: $rear\n";
    
22. 
    

复制代码

wfnh

的确很有趣
魔术是....

x9x9

神马意思？没看明白~求教~

toniz

意思是  通过SUBSTR获取的是字符串的固定位置的值。

VERY GOOD..~

phoenix_perl

哦,原来是\函数名的原因.
我还奇怪,为啥$rear 最后和预期的不同.

黑色阳光_cu

左值函数的性质

じ☆vedě鍶唸

非常漂亮 赞:wink:

じ☆vedě鍶唸

非常漂亮 赞:wink:

zhlong8

示例不错，这里左值类似于 tiescalar 获取值和赋值都是通过函数调用实现的，不过是C级别

黑色阳光_cu

示例不错，这里左值类似于 tiescalar 获取值和赋值都是通过函数调用实现的，不过是C级别
zhlong8 发表于 2010-12-16 21:03

   
你看过 lvalue 有关的实现了？