DOKK / manpages / debian 12 / libmousex-nativetraits-perl / MouseX::NativeTraits::Num.3pm.en
MouseX::NativeTraits::Num(3pm) User Contributed Perl Documentation MouseX::NativeTraits::Num(3pm)

MouseX::NativeTraits::Num - Helper trait for Num attributes

  package Real;
  use Mouse;
  has 'integer' => (
      traits    => ['Number'],
      is        => 'ro',
      isa       => 'Num',
      default   => 5,
      handles   => {
          set => 'set',
          add => 'add',
          sub => 'sub',
          mul => 'mul',
          div => 'div',
          mod => 'mod',
          abs => 'abs',
      },
  );
  my $real = Real->new();
  $real->add(5); # same as $real->integer($real->integer + 5);
  $real->sub(2); # same as $real->integer($real->integer - 2);

This provides a simple numeric attribute, which supports most of the basic math operations.

It is important to note that all those methods do in place modification of the value stored in the attribute. These methods are implemented within this package.

Adds the current value of the attribute to $value.
Subtracts $value from the current value of the attribute.
Multiplies the current value of the attribute by $value.
Divides the current value of the attribute by $value.
Returns the current value of the attribute modulo $value.
Sets the current value of the attribute to its absolute value.

MouseX::NativeTraits

2022-06-16 perl v5.34.0