小编nan*_*ndo的帖子

是否有约定要求函数的必需参数列表？我希望能够调用一个子程序,告诉我在调用@repeat时需要提供$ phrase和$ times.

use strict;
use warnings;

sub repeat {
    my $phrase = shift;
    my $times = shift;
    return $phrase x $times;
    }