神奇的substr左值用法

zhlong8

回復 10# 黑色陽光_cu


    Devel::Peek 可以看到它是是 PVLV 類型的值， magic 類型是 substr(可以看 illguts)，具體這個 magic 的實現(xiàn)還沒看到

liyangole

{:3_190:} 神奇 哈。

atiking

黑色陽光_cu 發(fā)表于 2010-12-16 17:00

加一行，更清楚

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

復制代碼

substr( $string, $start, $stop ) = 'somevalue'
相當于
substr( $string, $start, $stop , 'somevalue' );


不過$str賦值為"new string"后，為什么print出來的結果是

front:n   rear:r

黑色陽光_cu

加一行，更清楚substr( $string, $start, $stop ) = 'somevalue'
相當于
substr( $string, $start, $ ...
atiking 發(fā)表于 2010-12-17 13:18

   
改了，貼代碼時忘加了。

atiking

回復 14# 黑色陽光_cu


  能幫我解釋下，最后一行結果為什么rear是'r'嗎

黑色陽光_cu

回復  黑色陽光_cu


  能幫我解釋下，最后一行結果為什么rear是'r'嗎
atiking 發(fā)表于 2010-12-17 14:30

   
明顯，負數(shù)位置被轉成正的處理了。在字符串"abcdefg"上，位置-1等價于位置6。而"new string"位置6的字母是r

kingwmj

認真學習。。。