|
|
|
|
  多个参数怎么传给子函数 - taoshen [ 2004-08-31 16:09 | 62 byte(s)]
Re: 多个参数怎么传给子函数 - redcandle [ 2004-09-01 01:36 | 103 byte(s)]
Re: 多个参数怎么传给子函数 - taoshen [ 2004-09-02 18:30 | 440 byte(s)]
Re: 多个参数怎么传给子函数 - yanglii [ 2004-09-02 18:55 | 388 byte(s)]
Re: 多个参数怎么传给子函数 - taoshen [ 2004-09-02 22:06 | 523 byte(s)]
Re: 多个参数怎么传给子函数 - yanglii [ 2004-09-02 22:52 | 353 byte(s)]
Re: 多个参数怎么传给子函数 - taoshen [ 2004-09-03 09:44 | 104 byte(s)]
Re: 多个参数怎么传给子函数 - yanglii [ 2004-09-03 10:31 | 44 byte(s)]
Re: 多个参数怎么传给子函数 - taoshen [ 2004-09-02 21:42 | 77 byte(s)]
|
|
|
|
[Original]
[Print]
[Top]
|
谢谢楼上的回答。还有个小问题。比方
if( ){
$_[$num]="filename.$Num"; # $Num是自然数
&f1(@_);
}
sub f1{
my $filename=@_;
print "$filename";
}
这样print出来的$filename 总是自然数“1，2，3，”，不是预想的“filename.1,filename.2 filename.3”
这是为什么呢？
|
|
|
[Original]
[Print]
[Top]
|
|
[Original]
[Print]
[Top]
|
LIKE THIS:
if( ){
$_[$num]="filename.$Num"; # $Num是自然数
&f1(@_); # 这里想干嘛呀？
}
sub f1{
my ($filename)=@_; # 得到参数，必须是数组的形式
print "$filename";
}
哎，先看看课本吧！！！
没法讲。
|
|
|
----
-------------
过去心不可得，现在心不可得，未来心不可得
|
|
[Original]
[Print]
[Top]
|
|
[Original]
[Print]
[Top]
|
还有你说的
“ &f1(@_); # 这里想干嘛呀？ “ 我的思路是这样的
for(){
$_[$num]="filename.$Num" # 在这个for循环下，构造$_这个数组。
&sub_func1( @_ ); #这里子函数的参数就是上句刚构造的数组的第N个变量“filename.$Num”.例如"filename.10"
}
还有，要是还有个sub_func1,它也要传个参数，&sub_func2 (@_ )。会不会和&sub_func2(@_)混淆呢？
|
|
|
[Original]
[Print]
[Top]
|
|
[Original]
[Print]
[Top]
|
你的程序看起来很费劲，我猜想是不是这样啊：
my @fileName = ();
for(my $i=0; $i<10; $i++) {
$fileName[$i] = "filename.$i";
&f1($fileName[$i]);
}
sub f1 {
my $f = shift;
print "$f
";
}
|
|
|
----
-------------
过去心不可得，现在心不可得，未来心不可得
|
|
[Original]
[Print]
[Top]
|
|
« Previous thread
如何增加button |
Perl 编 程
第4页 |
Next thread »
perl 代码 请教 |
|
声明: 本页内容为中国Linux论坛的内容镜像，文章的版权以及其他所有的相关权利属于中国Linux论坛和相应文章的作者，如果转载，请注明文章来源及相关版权信息。