如何在Moops中重载方法？

Question

我想重载Moops中的一些方法。

我有试过下面的代码：

method setIdNum() { 
     print "Please enter ID number: "; 
     chomp (my $input = <STDIN>); 
     $self->$idNum($input); 
} 

method setIdNum(Int $num) { 
     $self->$idNum($num); 
} 

但它错误说setIdNum被重新定义。

Answer 1

如果你想多方法，你必须通过把multi在method关键字前面明确要求他们：

multi method setIdNum() { 
    print "Please enter ID number: "; 
    chomp (my $input = <STDIN>); 
    $self->$idNum($input); 
} 

multi method setIdNum(Int $num) { 
    $self->$idNum($num); 
} 

您可能还需要明确要求你的类声明中Kavorka支持：

class Whatever { 
    use Kavorka qw(multi method); 
    ...