File Coverage

blib/lib/TOML/Parser/Tokenizer/Strict.pm
Criterion Covered Total %
statement 22 22 100.0
branch n/a
condition n/a
subroutine 6 6 100.0
pod 0 1 0.0
total 28 29 96.5


line stmt bran cond sub pod time code
1             package TOML::Parser::Tokenizer::Strict;
2 20     20   319 use 5.010000;
  20         67  
3 20     20   98 use strict;
  20         43  
  20         374  
4 20     20   90 use warnings;
  20         51  
  20         506  
5              
6 20     20   4592 use parent qw/TOML::Parser::Tokenizer/;
  20         4796  
  20         94  
7 20     20   5805 BEGIN { import TOML::Parser::Tokenizer qw/:constant/ }
8              
9             sub grammar_regexp {
10 363     363 0 459 my $grammar_regexp = {%{ shift->SUPER::grammar_regexp() }};
  363         731  
11 363         922 $grammar_regexp->{table} = {%{ $grammar_regexp->{table} }};
  363         979  
12 363         652 $grammar_regexp->{array_of_table} = {%{ $grammar_regexp->{array_of_table} }};
  363         850  
13 363         1115 $grammar_regexp->{table}->{key} = qr{(?:"(.*?)(?
14 363         819 $grammar_regexp->{array_of_table}->{key} = qr{(?:"(.*?)(?
15 363         726 $grammar_regexp->{key} = qr{(?:"(.*?)(?
16 363         722 return $grammar_regexp;
17             }
18              
19             1;
20             __END__