Re: [PerlChina] 如何选择子例程返回值？

当然是传指针比较好了， 方法1效率高，

 

方法2 当hash，list  大的就效率低了，

 

 

 

2012/7/1 De-Jian Zhao <dejian.zhao@gmail.com>

各位好，请教一个问题。最近写了一个subroutine，尝试了两种方法，主要区别是 子例程的返回值不同。一个是返回hash reference（方法1），一个是直接返回 hash（方法2）。在运行时感觉方法2会稍有停顿。因此，想问一个问题：方法2 中%fasseq在接收子 例程的返回值时是不是要复制一份结果，并不是直接操作子例 程中的那块内存地址？方法1中my %fasseq = %$fasseq;是不是直接把地址传 给%fasseq进行操作？应当如何设置这个返回值？

还有一个问题是：Perl自带的函数根据上下文的不同可以返回scalar或者list，自 己写子例程时如何实现？


方法1：
sub read_fasta_into_hash() {
    my $fasfile = shift @_;
    my %fasseq;
    .....
    return \%fasseq;
}
my $fasseq = &read_fasta_into_hash($fasfile);
my %fasseq = %$fasseq;


方法2：
sub read_fasta_into_hash() {
    my $fasfile = shift @_;
    my %fasseq;
    .....
    return %fasseq;
}
my %fasseq = &read_fasta_into_hash($fasfile);


--
您收到此邮件是因为您订阅了 Google 网上论坛的“PerlChina Mongers 讨论组”论坛。
要向此网上论坛发帖，请发送电子邮件至 perlchina@googlegroups.com。
要取消订阅此网上论坛，请发送电子邮件至 perlchina+unsubscribe@googlegroups.com。
若有更多问题，请通过 http://groups.google.com/group/perlchina?hl=zh-CN 访问此网上论坛。

--
            Yours Sincerely
                    Zeng Hong

--
您收到此邮件是因为您订阅了 Google 网上论坛的"PerlChina Mongers 讨论组"论坛。
要向此网上论坛发帖，请发送电子邮件至 perlchina@googlegroups.com。
要取消订阅此网上论坛，请发送电子邮件至 perlchina+unsubscribe@googlegroups.com。
若有更多问题，请通过 http://groups.google.com/group/perlchina?hl=zh-CN 访问此网上论坛。