Lines Matching defs:num
447 use overload nomethod => \&wrap, '""' => \&str, '0+' => \&num,
489 sub num {
493 $a = $a->num if ref $a eq __PACKAGE__;
494 $b = $b->num if ref $b eq __PACKAGE__;
571 use overload nomethod => \&wrap, '""' => \&str, '0+' => \&num, '=' => \&cpy;
610 sub num {
614 $a = $a->num if ref $a eq __PACKAGE__;
615 $b = $b->num if ref $b eq __PACKAGE__;
693 use overload '""' => \&str, '0+' => \&num, fallback => 1;
694 sub num {shift->[1]}