子程序 返回值 问题

Little-C

1. use strict;
   
2. use warnings;
   
3. 
   
4. my $x = 0;
   
5. 
   
6. sub f {
   
7.    
   
8.     $x++;
   
9.     print "L: x is $x\n";
   
10.    
    
11.     my $x = -100;
    
12.     print "M: x is $x\n";
    
13.    
    
14.     return $x;
    
15. }
    
16. 
    
17. f();
    
18. print "O: x is $x\n";
    

复制代码

返回值不应该是最后一个附值的么
但是输出的是
L: x is 1
M: x is -100
O: x is 1

O为什么是1 不是－100呢

Monox

回复 1# Little-C
按照你的意思，岂不:

1. 
   
2. sub f {
   
3.     my $a = 9;
   
4.     return $a;
   
5. }
   
6. f();
   
7. print "a is $a";
   

复制代码

应该输出 a is 9 了。

jason680

$x = f();

zhlong8

基本的作用域都没搞明白……

见
http://bbs.chinaunix.net/viewthr ... ge=1&highlight=

Little-C

回复 4# zhlong8


    额～～谢谢～～{:3_194:}