| line |
stmt |
bran |
cond |
sub |
pod |
time |
code |
|
1
|
|
|
|
|
|
|
package DTL::Fast::Expression::Operator; |
|
2
|
98
|
|
|
98
|
|
2332
|
use strict; use utf8; use warnings FATAL => 'all'; |
|
|
98
|
|
|
98
|
|
139
|
|
|
|
98
|
|
|
98
|
|
2142
|
|
|
|
98
|
|
|
|
|
336
|
|
|
|
98
|
|
|
|
|
100
|
|
|
|
98
|
|
|
|
|
335
|
|
|
|
98
|
|
|
|
|
1707
|
|
|
|
98
|
|
|
|
|
108
|
|
|
|
98
|
|
|
|
|
4642
|
|
|
3
|
|
|
|
|
|
|
|
|
4
|
|
|
|
|
|
|
our $VERSION = '1.00'; |
|
5
|
|
|
|
|
|
|
|
|
6
|
98
|
|
|
98
|
|
338
|
use DTL::Fast qw(register_operator); |
|
|
98
|
|
|
|
|
111
|
|
|
|
98
|
|
|
|
|
12472
|
|
|
7
|
|
|
|
|
|
|
|
|
8
|
|
|
|
|
|
|
register_operator( |
|
9
|
|
|
|
|
|
|
'or' => [0, 'DTL::Fast::Expression::Operator::Binary::Or'], |
|
10
|
|
|
|
|
|
|
|
|
11
|
|
|
|
|
|
|
'and' => [1, 'DTL::Fast::Expression::Operator::Binary::And'], |
|
12
|
|
|
|
|
|
|
|
|
13
|
|
|
|
|
|
|
'==' => [2, 'DTL::Fast::Expression::Operator::Binary::Eq'], |
|
14
|
|
|
|
|
|
|
'!=' => [2, 'DTL::Fast::Expression::Operator::Binary::Ne'], |
|
15
|
|
|
|
|
|
|
'<>' => [2, 'DTL::Fast::Expression::Operator::Binary::Ne'], |
|
16
|
|
|
|
|
|
|
'<' => [2, 'DTL::Fast::Expression::Operator::Binary::Lt'], |
|
17
|
|
|
|
|
|
|
'>' => [2, 'DTL::Fast::Expression::Operator::Binary::Gt'], |
|
18
|
|
|
|
|
|
|
'<=' => [2, 'DTL::Fast::Expression::Operator::Binary::Le'], |
|
19
|
|
|
|
|
|
|
'>=' => [2, 'DTL::Fast::Expression::Operator::Binary::Ge'], |
|
20
|
|
|
|
|
|
|
|
|
21
|
|
|
|
|
|
|
'+' => [3, 'DTL::Fast::Expression::Operator::Binary::Plus'], |
|
22
|
|
|
|
|
|
|
'-' => [3, 'DTL::Fast::Expression::Operator::Binary::Minus'], |
|
23
|
|
|
|
|
|
|
|
|
24
|
|
|
|
|
|
|
'*' => [4, 'DTL::Fast::Expression::Operator::Binary::Mul'], |
|
25
|
|
|
|
|
|
|
'/' => [4, 'DTL::Fast::Expression::Operator::Binary::Div'], |
|
26
|
|
|
|
|
|
|
'%' => [4, 'DTL::Fast::Expression::Operator::Binary::Mod'], |
|
27
|
|
|
|
|
|
|
'mod' => [4, 'DTL::Fast::Expression::Operator::Binary::Mod'], |
|
28
|
|
|
|
|
|
|
|
|
29
|
|
|
|
|
|
|
'not in' => [5, 'DTL::Fast::Expression::Operator::Binary::NotIn'], |
|
30
|
|
|
|
|
|
|
'in' => [5, 'DTL::Fast::Expression::Operator::Binary::In'], |
|
31
|
|
|
|
|
|
|
|
|
32
|
|
|
|
|
|
|
'not' => [6, 'DTL::Fast::Expression::Operator::Unary::Not'], |
|
33
|
|
|
|
|
|
|
|
|
34
|
|
|
|
|
|
|
'defined' => [7, 'DTL::Fast::Expression::Operator::Unary::Defined'], |
|
35
|
|
|
|
|
|
|
|
|
36
|
|
|
|
|
|
|
'**' => [8, 'DTL::Fast::Expression::Operator::Binary::Pow'], |
|
37
|
|
|
|
|
|
|
'pow' => [8, 'DTL::Fast::Expression::Operator::Binary::Pow'], |
|
38
|
|
|
|
|
|
|
); |
|
39
|
|
|
|
|
|
|
|
|
40
|
|
|
|
|
|
|
1; |