MouseX::NativeTraits::Num(3pm) User Contributed Perl Documentation MouseX::NativeTraits::Num(3pm)NAME
MouseX::NativeTraits::Num - Helper trait for Num attributes
SYNOPSIS
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);
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 $value from the current value of the attribute.
mul($value)
Multiplies the current value of the attribute by $value.
div($value)
Divides the current value of the attribute by $value.
mod($value)
Returns the current value of the attribute modulo $value.
abs Sets the current value of the attribute to its absolute value.
METHODS
meta
method_provider_class
helper_type
SEE ALSO
MouseX::NativeTraits
perl v5.14.2 2011-12-04 MouseX::NativeTraits::Num(3pm)
Check Out this Related Man Page
MouseX::NativeTraits::Bool(3pm) User Contributed Perl Documentation MouseX::NativeTraits::Bool(3pm)NAME
MouseX::NativeTraits::Bool - Helper trait for Bool attributes
SYNOPSIS
package Room;
use Mouse;
has 'is_lit' => (
traits => ['Bool'],
is => 'rw',
isa => 'Bool',
default => 0,
handles => {
illuminate => 'set',
darken => 'unset',
flip_switch => 'toggle',
is_dark => 'not',
},
);
my $room = Room->new();
$room->illuminate; # same as $room->is_lit(1);
$room->darken; # same as $room->is_lit(0);
$room->flip_switch; # same as $room->is_lit(not $room->is_lit);
return $room->is_dark; # same as !$room->is_lit
DESCRIPTION
This provides a simple boolean attribute, which supports most of the basic math operations.
PROVIDED METHODS
These methods are implemented in MouseX::NativeTraits::MethodProvider::Bool. It is important to note that all those methods do in place
modification of the value stored in the attribute.
set Sets the value to true.
unset
Set the value to false.
toggle
Toggles the value. If it's true, set to false, and vice versa.
not Equivalent of 'not $value'.
METHODS
meta
method_provider_class
helper_type
SEE ALSO
MouseX::NativeTraits.
perl v5.14.2 2011-12-04 MouseX::NativeTraits::Bool(3pm)
Enter the first number: 2
Enter the second number(must be greater than 16): 20
Num 1 Num 2 Num 3 Sum1 Sum2 Prod1 Prod2 Quot1
2 20 20 22 22 40 40 0 0.1 2
6 16 16 22 22 96 96 0 0.375 6... (1 Reply)
I understand this question probably poses some child like stupidity, but I can't get this if statement to work for love or money.
#!/bin/ksh
echo "Input either 1 or 2"
read Num
if ; then
echo "Message 1"
if ; then
echo "Message 2"
else
echo "false"
fi
$ ksh decisions
Input either 1... (6 Replies)
Hi.
I have a qury whihc I hope someone could clarify.
I have a file:-
Num Measure
108 0.05
12 0.45
13 0.2
19 0.5
I wanted to grep the value of 19 from Column Num which will then take the minimum value of measure (not including 19's measure value).... (3 Replies)
Hi,
I am trying to calculate inverse modulus of a mod n ie.,
a ^ -1 mod n.
Is there a function in Perl that does this for me. If not, can someone help me with the code?
Thanks in advance.
Thanks,
Sundeep. (0 Replies)
Hi,
I cant seem to figure out how I add a character to an existing one. Heres my problem.
So I have a line that looks like this:
>56
584848392394958586858484849393
What I want to do is add Num in front of the 56. So basically I want to recognize the > and add Num in front of the... (6 Replies)
Hi all,
I have a huge csv file with the following format of data,
Num SNPs, 549997
Total SNPs,555352
Num Samples, 157
SNP, SampleID, Allele1, Allele2
A001,AB1,A,A
A002,AB1,A,A
A003,AB1,A,A
...
...
...
I would like to write out a list of unique SNP (column 1). Could you... (3 Replies)
Hello,
Not sure if this is the right place to post it but..
I have a requirement to set Caps lock and/or Num lock on and off via a Cron job.
Now I have working scripts that do the job, but as soon as X starts up the jobs no longer run (well they appear to, but Caps lock and Num lock do not... (0 Replies)
Hi,
Can anyone help:
I want to get the 7th column of a file seperated by ^
Num:^ 1^ testdevice1^10.1.1.1^PT1X23^true^HD^175^up^false^bad
Num:^ 2^ testdevice2^10.1.1.2^ST1X23^true^SN^175^up^false^bad
Expected result:
HD
SN
Appreciate your help. (2 Replies)
Hi All,
I am trying to add odm_wait attribute to CuAt programatically using putattr(&pCuAt).
I was able to add when the odm_wait has positive value . But, I am facing issues when the odm_wait has negative value
As per IBM, these are the odm_wait possible values
#define ODM_WAIT -1 /*... (3 Replies)