NAME
Moose::Meta::Attribute::Native::Trait::Number
SYNOPSIS
package Real;
use Moose;
has 'integer' => (
metaclass => 'Number',
is => 'ro',
isa => 'Int',
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);
DESCRIPTION
This provides a simple numeric attribute, which supports most of the basic math operations.
PROVIDED METHODS
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.
- set($value)
-
Alternate way to set the value.
- add($value)
-
Adds the current value of the attribute to
$value
. - sub($value)
-
Subtracts the current value of the attribute to
$value
. - mul($value)
-
Multiplies the current value of the attribute to
$value
. - div($value)
-
Divides the current value of the attribute to
$value
. - mod($value)
-
Modulus the current value of the attribute to
$value
. - abs
-
Sets the current value of the attribute to its absolute value.
METHODS
- meta
- method_constructors
BUGS
All complex software has bugs lurking in it, and this module is no exception. If you find a bug please either email me, or add the bug to cpan-RT.
AUTHOR
Robert Boone
COPYRIGHT AND LICENSE
Copyright 2007-2009 by Infinity Interactive, Inc.
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.