Revision 7fde0dcd
Von Moritz Bunkus vor mehr als 11 Jahren hinzugefügt
| SL/PrefixedNumber.pm | ||
|---|---|---|
| 64 | 64 |
sub set_to_max {
|
| 65 | 65 |
my ($self, @numbers) = @_; |
| 66 | 66 |
|
| 67 |
return $self->set_to(max map { SL::PrefixedNumber->new(number => $_)->_state->{ref_number} } @numbers);
|
|
| 67 |
return $self->set_to(max map { SL::PrefixedNumber->new(number => $_ // 0)->_state->{ref_number} } @numbers);
|
|
| 68 | 68 |
} |
| 69 | 69 |
|
| 70 | 70 |
1; |
Auch abrufbar als: Unified diff
SL::PrefixedNumber::set_to_max: mit undefinierten Werten klarkommen