Branch Coverage
blib/lib/Hash/Key/Quote.pm
Criterion
Covered
Total
%
branch
4
4
100.0
line
true
false
branch
17
2
3
if $str =~ /\A-?[A-Za-z_]\w*\z/
18
1
2
if $str =~ /\A-?[1-9]\d{0,8}\z/