Branch Coverage

blib/lib/File/System/Globber.pm

Criterion	Covered	Total	%
branch	254	544	46.6

line	true	false	branch
35	0	18229	if defined $main::RD_TRACE
54	18229	0	defined $_[4] ? :
56	18229	0	$#arg & 1 ? :
71	0	18229	if defined $main::RD_TRACE
84	0	18229	if defined $main::RD_TRACE
91	0	18229	unless (defined($_tok = $thisparser->_parserepeat($text, \&match, 1, 100000000, $_noactions, $expectation, sub { \@arg; } , undef)))
93	0	0	if defined $main::RD_TRACE
100	0	18229	if defined $main::RD_TRACE
112	0	18229	if defined $main::RD_TRACE
125	0	18229	unless ($_matched or defined $score)
130	0	0	if defined $main::RD_TRACE
137	0	18229	if (not defined $return and defined $score)
139	0	0	if defined $main::RD_TRACE
146	18229	0	unless defined $return
147	0	18229	if (defined $main::RD_TRACE)
172	0	75398	if defined $main::RD_TRACE
191	75398	0	defined $_[4] ? :
193	75398	0	$#arg & 1 ? :
208	0	75398	if defined $main::RD_TRACE
221	0	75398	if defined $main::RD_TRACE
230	0	75398	if $lastsep = $1
	75394	4	unless ($text =~ s/\A($Parse::RecDescent::File::System::Globber::skip)/'' if $lastsep = $1;/e and $text =~ /\A\[/)
232	75394	0	if defined $lastsep
235	0	75394	if defined $main::RD_TRACE
242	0	4	if defined $main::RD_TRACE
249	0	4	if defined $main::RD_TRACE
256	0	4	unless (defined($_tok = $thisparser->_parserepeat($text, \&match_class, 1, 100000000, $_noactions, $expectation, sub { \@arg; } , undef)))
258	0	0	if defined $main::RD_TRACE
265	0	4	if defined $main::RD_TRACE
277	0	4	if defined $main::RD_TRACE
286	0	4	if $lastsep = $1
	0	4	unless ($text =~ s/\A($Parse::RecDescent::File::System::Globber::skip)/'' if $lastsep = $1;/e and $text =~ /\A\]/)
288	0	0	if defined $lastsep
291	0	0	if defined $main::RD_TRACE
298	0	4	if defined $main::RD_TRACE
305	0	4	if defined $main::RD_TRACE
312	0	4	$_noactions ? :
313	0	4	unless (defined $_tok)
315	0	0	if defined $main::RD_TRACE
319	0	4	if defined $main::RD_TRACE
327	0	4	if defined $main::RD_TRACE
340	75394	4	unless ($_matched or defined $score)
345	0	75394	if defined $main::RD_TRACE
352	0	4	if (not defined $return and defined $score)
354	0	0	if defined $main::RD_TRACE
361	0	4	unless defined $return
362	0	4	if (defined $main::RD_TRACE)
387	0	76324	if defined $main::RD_TRACE
406	76324	0	defined $_[4] ? :
408	76324	0	$#arg & 1 ? :
423	0	76324	if defined $main::RD_TRACE
436	0	76324	if defined $main::RD_TRACE
445	0	76324	if $lastsep = $1
	75398	926	unless ($text =~ s/\A($Parse::RecDescent::File::System::Globber::skip)/'' if $lastsep = $1;/e and $text =~ /\A\{/)
447	75398	0	if defined $lastsep
450	0	75398	if defined $main::RD_TRACE
457	0	926	if defined $main::RD_TRACE
464	0	926	if defined $main::RD_TRACE
480	0	926	if defined $main::RD_TRACE
487	0	926	unless (defined($_tok = match_option($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
490	0	0	if defined $main::RD_TRACE
498	0	926	if defined $main::RD_TRACE
522	0	1854	if defined $main::RD_TRACE
530	0	1854	if $lastsep = $1
	926	928	unless ($text =~ s/\A($Parse::RecDescent::File::System::Globber::skip)/'' if $lastsep = $1;/e and $text =~ /\A(?:,)/)
532	926	0	if defined $lastsep
534	0	926	if defined $main::RD_TRACE
542	0	928	if defined $main::RD_TRACE
550	0	928	if (defined $1)
552	0	928	if defined $main::RD_TRACE
559	0	928	unless (defined($_tok = match_option($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
562	0	0	if defined $main::RD_TRACE
570	0	928	if defined $main::RD_TRACE
586	0	926	if $backtrack
588	0	926	unless (@item)
594	0	926	unless ($repcount >= 1)
596	0	0	if defined $main::RD_TRACE
604	0	926	if defined $main::RD_TRACE
605	0	0	unless $_tok
613	0	926	if defined $main::RD_TRACE
622	0	926	if $lastsep = $1
	0	926	unless ($text =~ s/\A($Parse::RecDescent::File::System::Globber::skip)/'' if $lastsep = $1;/e and $text =~ /\A\}/)
624	0	0	if defined $lastsep
627	0	0	if defined $main::RD_TRACE
634	0	926	if defined $main::RD_TRACE
641	0	926	if defined $main::RD_TRACE
648	0	926	$_noactions ? :
649	0	926	unless (defined $_tok)
651	0	0	if defined $main::RD_TRACE
655	0	926	if defined $main::RD_TRACE
663	0	926	if defined $main::RD_TRACE
676	75398	926	unless ($_matched or defined $score)
681	0	75398	if defined $main::RD_TRACE
688	0	926	if (not defined $return and defined $score)
690	0	0	if defined $main::RD_TRACE
697	0	926	unless defined $return
698	0	926	if (defined $main::RD_TRACE)
723	0	82138	if defined $main::RD_TRACE
742	82138	0	defined $_[4] ? :
744	82138	0	$#arg & 1 ? :
759	0	82138	if defined $main::RD_TRACE
772	0	82138	if defined $main::RD_TRACE
781	0	82138	if $lastsep = $1
	80288	1850	unless ($text =~ s/\A($Parse::RecDescent::File::System::Globber::skip)/'' if $lastsep = $1;/e and $text =~ /\A\?/)
783	80288	0	if defined $lastsep
786	0	80288	if defined $main::RD_TRACE
793	0	1850	if defined $main::RD_TRACE
800	0	1850	if defined $main::RD_TRACE
807	0	1850	$_noactions ? :
808	0	1850	unless (defined $_tok)
810	0	0	if defined $main::RD_TRACE
814	0	1850	if defined $main::RD_TRACE
822	0	1850	if defined $main::RD_TRACE
835	80288	1850	unless ($_matched or defined $score)
840	0	80288	if defined $main::RD_TRACE
847	0	1850	if (not defined $return and defined $score)
849	0	0	if defined $main::RD_TRACE
856	0	1850	unless defined $return
857	0	1850	if (defined $main::RD_TRACE)
882	0	80288	if defined $main::RD_TRACE
901	80288	0	defined $_[4] ? :
903	80288	0	$#arg & 1 ? :
918	0	80288	if defined $main::RD_TRACE
931	0	80288	if defined $main::RD_TRACE
940	0	80288	if $lastsep = $1
	76324	3964	unless ($text =~ s/\A($Parse::RecDescent::File::System::Globber::skip)/'' if $lastsep = $1;/e and $text =~ /\A\*/)
942	76324	0	if defined $lastsep
945	0	76324	if defined $main::RD_TRACE
952	0	3964	if defined $main::RD_TRACE
959	0	3964	if defined $main::RD_TRACE
966	0	3964	$_noactions ? :
967	0	3964	unless (defined $_tok)
969	0	0	if defined $main::RD_TRACE
973	0	3964	if defined $main::RD_TRACE
981	0	3964	if defined $main::RD_TRACE
994	76324	3964	unless ($_matched or defined $score)
999	0	76324	if defined $main::RD_TRACE
1006	0	3964	if (not defined $return and defined $score)
1008	0	0	if defined $main::RD_TRACE
1015	0	3964	unless defined $return
1016	0	3964	if (defined $main::RD_TRACE)
1041	0	1854	if defined $main::RD_TRACE
1060	1854	0	defined $_[4] ? :
1062	1854	0	$#arg & 1 ? :
1077	0	1854	if defined $main::RD_TRACE
1090	0	1854	if defined $main::RD_TRACE
1098	0	1854	if $lastsep = $1
	0	1854	unless ($text =~ s/\A($Parse::RecDescent::File::System::Globber::skip)/'' if $lastsep = $1;/e and $text =~ /\A(?:(?:[^,\}\\]|\\}|\\,|\\)+)/)
1100	0	0	if defined $lastsep
1102	0	0	if defined $main::RD_TRACE
1110	0	1854	if defined $main::RD_TRACE
1117	0	1854	if defined $main::RD_TRACE
1124	0	1854	$_noactions ? :
1129	0	1854	unless (defined $_tok)
1131	0	0	if defined $main::RD_TRACE
1135	0	1854	if defined $main::RD_TRACE
1143	0	1854	if defined $main::RD_TRACE
1156	0	1854	unless ($_matched or defined $score)
1161	0	0	if defined $main::RD_TRACE
1168	0	1854	if (not defined $return and defined $score)
1170	0	0	if defined $main::RD_TRACE
1177	0	1854	unless defined $return
1178	0	1854	if (defined $main::RD_TRACE)
1203	0	12	if defined $main::RD_TRACE
1222	12	0	defined $_[4] ? :
1224	12	0	$#arg & 1 ? :
1239	0	12	if defined $main::RD_TRACE
1252	0	12	if defined $main::RD_TRACE
1260	0	12	if $lastsep = $1
	10	2	unless ($text =~ s/\A($Parse::RecDescent::File::System::Globber::skip)/'' if $lastsep = $1;/e and $text =~ /\A(?:(.)-(.))/)
1262	10	0	if defined $lastsep
1264	0	10	if defined $main::RD_TRACE
1272	0	2	if defined $main::RD_TRACE
1279	0	2	if defined $main::RD_TRACE
1286	0	2	$_noactions ? :
1287	0	2	unless (defined $_tok)
1289	0	0	if defined $main::RD_TRACE
1293	0	2	if defined $main::RD_TRACE
1301	0	2	if defined $main::RD_TRACE
1317	0	10	if defined $main::RD_TRACE
1330	0	10	if defined $main::RD_TRACE
1338	0	10	if $lastsep = $1
	10	0	unless ($text =~ s/\A($Parse::RecDescent::File::System::Globber::skip)/'' if $lastsep = $1;/e and $text =~ /\A(?:\\])/)
1340	10	0	if defined $lastsep
1342	0	10	if defined $main::RD_TRACE
1350	0	0	if defined $main::RD_TRACE
1357	0	0	if defined $main::RD_TRACE
1364	0	0	$_noactions ? :
1365	0	0	unless (defined $_tok)
1367	0	0	if defined $main::RD_TRACE
1371	0	0	if defined $main::RD_TRACE
1379	0	0	if defined $main::RD_TRACE
1395	0	10	if defined $main::RD_TRACE
1408	0	10	if defined $main::RD_TRACE
1416	0	10	if $lastsep = $1
	4	6	unless ($text =~ s/\A($Parse::RecDescent::File::System::Globber::skip)/'' if $lastsep = $1;/e and $text =~ /\A(?:[^\]])/)
1418	4	0	if defined $lastsep
1420	0	4	if defined $main::RD_TRACE
1428	0	6	if defined $main::RD_TRACE
1435	0	6	if defined $main::RD_TRACE
1442	0	6	$_noactions ? :
1443	0	6	unless (defined $_tok)
1445	0	0	if defined $main::RD_TRACE
1449	0	6	if defined $main::RD_TRACE
1457	0	6	if defined $main::RD_TRACE
1470	4	8	unless ($_matched or defined $score)
1475	0	4	if defined $main::RD_TRACE
1482	0	8	if (not defined $return and defined $score)
1484	0	0	if defined $main::RD_TRACE
1491	0	8	unless defined $return
1492	0	8	if (defined $main::RD_TRACE)
1517	0	82138	if defined $main::RD_TRACE
1536	82138	0	defined $_[4] ? :
1538	82138	0	$#arg & 1 ? :
1553	0	82138	if defined $main::RD_TRACE
1566	0	82138	if defined $main::RD_TRACE
1573	80288	1850	unless (defined($_tok = match_one($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
1576	0	80288	if defined $main::RD_TRACE
1584	0	1850	if defined $main::RD_TRACE
1596	0	1850	if defined $main::RD_TRACE
1612	0	80288	if defined $main::RD_TRACE
1625	0	80288	if defined $main::RD_TRACE
1632	76324	3964	unless (defined($_tok = match_any($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
1635	0	76324	if defined $main::RD_TRACE
1643	0	3964	if defined $main::RD_TRACE
1655	0	3964	if defined $main::RD_TRACE
1671	0	76324	if defined $main::RD_TRACE
1684	0	76324	if defined $main::RD_TRACE
1691	75398	926	unless (defined($_tok = match_alternative($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
1694	0	75398	if defined $main::RD_TRACE
1702	0	926	if defined $main::RD_TRACE
1714	0	926	if defined $main::RD_TRACE
1730	0	75398	if defined $main::RD_TRACE
1743	0	75398	if defined $main::RD_TRACE
1750	75394	4	unless (defined($_tok = match_collection($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
1753	0	75394	if defined $main::RD_TRACE
1761	0	4	if defined $main::RD_TRACE
1773	0	4	if defined $main::RD_TRACE
1789	0	75394	if defined $main::RD_TRACE
1802	0	75394	if defined $main::RD_TRACE
1809	18229	57165	unless (defined($_tok = match_character($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
1812	0	18229	if defined $main::RD_TRACE
1820	0	57165	if defined $main::RD_TRACE
1832	0	57165	if defined $main::RD_TRACE
1845	18229	63909	unless ($_matched or defined $score)
1850	0	18229	if defined $main::RD_TRACE
1857	0	63909	if (not defined $return and defined $score)
1859	0	0	if defined $main::RD_TRACE
1866	63909	0	unless defined $return
1867	0	63909	if (defined $main::RD_TRACE)
1892	0	75394	if defined $main::RD_TRACE
1911	75394	0	defined $_[4] ? :
1913	75394	0	$#arg & 1 ? :
1928	0	75394	if defined $main::RD_TRACE
1941	0	75394	if defined $main::RD_TRACE
1949	0	75394	if $lastsep = $1
	18229	57165	unless ($text =~ s/\A($Parse::RecDescent::File::System::Globber::skip)/'' if $lastsep = $1;/e and $text =~ /\A(?:.)/)
1951	18229	0	if defined $lastsep
1953	0	18229	if defined $main::RD_TRACE
1961	0	57165	if defined $main::RD_TRACE
1968	0	57165	if defined $main::RD_TRACE
1975	0	57165	$_noactions ? :
1976	0	57165	unless (defined $_tok)
1978	0	0	if defined $main::RD_TRACE
1982	0	57165	if defined $main::RD_TRACE
1990	0	57165	if defined $main::RD_TRACE
2003	18229	57165	unless ($_matched or defined $score)
2008	0	18229	if defined $main::RD_TRACE
2015	0	57165	if (not defined $return and defined $score)
2017	0	0	if defined $main::RD_TRACE
2024	0	57165	unless defined $return
2025	0	57165	if (defined $main::RD_TRACE)