File Coverage

blib/lib/Heap/Simple/String.pm
Criterion Covered Total %
statement 5 5 100.0
branch n/a
condition n/a
subroutine 3 3 100.0
pod 0 1 0.0
total 8 9 88.8


line stmt bran cond sub pod time code
1             package Heap::Simple::String;
2             $VERSION = "0.02";
3 1     1   6 use strict;
  1         2  
  1         105  
4              
5             sub _SMALLER {
6 1044     1044   11321 return "$_[1] lt $_[2]";
7             }
8              
9             sub order {
10 245     245 0 34611 return "lt";
11             }
12              
13             1;