Chinaunix

标题: @ARGV的类型？ [打印本页]

---

作者: gosapphire    时间: 2011-03-30 15:34
标题: @ARGV的类型？
写了段代码：
调用
test.pl

1. #!/usr/bin/perl
   
2. 
   
3. use strict;
   
4. use warnings;
   
5. 
   
6. use Xxx::Commander;
   
7. 
   
8. my $cmd = Commander->new();
   
9. $cmd->procArg(@ARGV);
   

复制代码

Commander.pm

1. 
   
2. package Commander;
   
3. 
   
4. use strict;
   
5. use warnings;
   
6. 
   
7. sub new
   
8. {
   
9.     my $self = {};
   
10.     bless($self);
    
11.     return $self;
    
12. }
    
13. 
    
14. 
    
15. sub procArg
    
16. {
    
17.     my(@Args) = @_;
    
18.     foreach my $arg ( @Args )
    
19.     {
    
20.         print $arg, "\n";
    
21.     }
    
22. }
    
23. 
    
24. 1;
    
25. 
    

复制代码

想问一下，"test.pl aaa bbb" 为什么打印出来的是：
Commander=HASH(0x124724)
aaa
bbb

---

作者: gosapphire    时间: 2011-03-30 15:57


自问自答.....
试了一下下面的code:

1. 
   
2. #!/usr/bin/perl
   
3. 
   
4. use strict;
   
5. use warnings;
   
6. 
   
7. use Xxx::Commander;
   
8. 
   
9. my $cmd = Commander->new();
   
10. $cmd->procArg(@ARGV);
    
11. 
    
12. my $cmd1 = Commander->new();
    
13. $cmd1->procArg(@ARGV);
    
14. 
    

复制代码

"test.pl aaa bbb" 打印出来的是：

1. 
   
2. Commander=HASH([b]0x124724[/b])
   
3. aaa
   
4. bbb
   
5. Commander=HASH([b]0x146a28[/b])
   
6. aaa
   
7. bbb
   

复制代码

又看了看perl oo的doc，
猜测在package里面的subroutine
@_的第一个元素应该是个类似this指针的东西，指向一块obj。

不知道有没有兄弟可以给个官方的解释？

---

作者: yybmsrs    时间: 2011-03-30 16:32
是这个意思

---

欢迎光临 Chinaunix (http://bbs.chinaunix.net/)

Powered by Discuz! X3.2