Branch Coverage

blib/lib/Mail/IMAPClient/BodyStructure/Parse.pm

Criterion	Covered	Total	%
branch	1619	3516	46.0

line	true	false	branch
26	0	820	unless exists $items->{$opt}
28	820	0	UNIVERSAL::isa($items->{$opt}, 'ARRAY') ? :
34	42	12	unless my $from = shift()
62	0	144	if defined $main::RD_TRACE
81	144	0	defined $_[4] ? :
83	144	0	$#arg & 1 ? :
98	0	144	if defined $main::RD_TRACE
111	0	144	if defined $main::RD_TRACE
118	98	46	unless (defined($_tok = NIL($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
121	0	98	if defined $main::RD_TRACE
129	0	46	if defined $main::RD_TRACE
141	0	46	if defined $main::RD_TRACE
154	98	46	unless $_matched
159	0	98	if defined $main::RD_TRACE
172	0	98	if defined $main::RD_TRACE
179	94	4	unless (defined($_tok = RFCNONCOMPLY($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
182	0	94	if defined $main::RD_TRACE
190	0	4	if defined $main::RD_TRACE
202	0	4	if defined $main::RD_TRACE
215	94	50	unless $_matched
220	0	94	if defined $main::RD_TRACE
233	0	94	if defined $main::RD_TRACE
242	94	0	if $lastsep = $1
	0	94	unless ($text =~ s/\A($Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::skip)/'' if $lastsep = $1;/e and do { $_tok = '('; 1 } and substr($text, 0, length $_tok) eq $_tok and do { substr($text, 0, length $_tok) = ''; 1 })
247	0	0	if defined $lastsep
250	0	0	if defined $main::RD_TRACE
255	0	94	if defined $main::RD_TRACE
262	0	94	if defined $main::RD_TRACE
269	0	94	unless (defined($_tok = $thisparser->_parserepeat($text, \&Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::addressstruct, 1, 100000000, $_noactions, $expectation, sub { \@arg; } , undef)))
271	0	0	if defined $main::RD_TRACE
278	0	94	if defined $main::RD_TRACE
290	0	94	if defined $main::RD_TRACE
299	0	94	if $lastsep = $1
	0	94	unless ($text =~ s/\A($Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::skip)/'' if $lastsep = $1;/e and do { $_tok = ')'; 1 } and substr($text, 0, length $_tok) eq $_tok and do { substr($text, 0, length $_tok) = ''; 1 })
304	0	0	if defined $lastsep
307	0	0	if defined $main::RD_TRACE
312	0	94	if defined $main::RD_TRACE
319	0	94	if defined $main::RD_TRACE
326	0	94	$_noactions ? :
327	0	94	unless (defined $_tok)
329	0	0	if defined $main::RD_TRACE
333	0	94	if defined $main::RD_TRACE
341	0	94	if defined $main::RD_TRACE
354	0	144	unless $_matched
356	0	144	unless ($_matched or defined $score)
362	0	0	if defined $main::RD_TRACE
369	0	144	if (not defined $return and defined $score)
371	0	0	if defined $main::RD_TRACE
378	50	94	unless defined $return
379	0	144	if (defined $main::RD_TRACE)
404	0	183	if defined $main::RD_TRACE
423	183	0	defined $_[4] ? :
425	183	0	$#arg & 1 ? :
440	0	183	if defined $main::RD_TRACE
453	0	183	if defined $main::RD_TRACE
461	17	166	if $lastsep = $1
	183	0	if ($text =~ s/\A($Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::skip)/'' if $lastsep = $1;/e and $text =~ /\A(?:^[)('"])/)
465	0	183	if defined $main::RD_TRACE
473	0	0	if defined $main::RD_TRACE
480	0	0	if defined $main::RD_TRACE
488	0	0	if $lastsep = $1
	0	0	unless ($text =~ s/\A($Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::skip)/'' if $lastsep = $1;/e and $text =~ /\A(?:^(?!\(|\))(?:\\ |\S)+)/)
490	0	0	if defined $lastsep
492	0	0	if defined $main::RD_TRACE
500	0	0	if defined $main::RD_TRACE
507	0	0	if defined $main::RD_TRACE
514	0	0	$_noactions ? :
515	0	0	unless (defined $_tok)
517	0	0	if defined $main::RD_TRACE
521	0	0	if defined $main::RD_TRACE
529	0	0	if defined $main::RD_TRACE
542	183	0	unless $_matched
544	183	0	unless ($_matched or defined $score)
550	0	183	if defined $main::RD_TRACE
557	0	0	if (not defined $return and defined $score)
559	0	0	if defined $main::RD_TRACE
566	0	0	unless defined $return
567	0	0	if (defined $main::RD_TRACE)
592	0	905	if defined $main::RD_TRACE
611	905	0	defined $_[4] ? :
613	905	0	$#arg & 1 ? :
628	0	905	if defined $main::RD_TRACE
641	0	905	if defined $main::RD_TRACE
650	508	397	if $lastsep = $1
	184	721	unless ($text =~ s/\A($Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::skip)/'' if $lastsep = $1;/e and $text =~ /\A\"/)
652	184	0	if defined $lastsep
655	0	184	if defined $main::RD_TRACE
662	0	721	if defined $main::RD_TRACE
669	0	721	if defined $main::RD_TRACE
677	0	721	if $lastsep = $1
	0	721	unless ($text =~ s/\A($Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::skip)/'' if $lastsep = $1;/e and $text =~ /\A(?:(?:\\["\\]|[^"])*)/)
679	0	0	if defined $lastsep
681	0	0	if defined $main::RD_TRACE
689	0	721	if defined $main::RD_TRACE
696	0	721	if defined $main::RD_TRACE
705	0	721	if $lastsep = $1
	0	721	unless ($text =~ s/\A($Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::skip)/'' if $lastsep = $1;/e and $text =~ /\A\"/)
707	0	0	if defined $lastsep
710	0	0	if defined $main::RD_TRACE
717	0	721	if defined $main::RD_TRACE
724	0	721	if defined $main::RD_TRACE
731	0	721	$_noactions ? :
732	0	721	unless (defined $_tok)
734	0	0	if defined $main::RD_TRACE
738	0	721	if defined $main::RD_TRACE
746	0	721	if defined $main::RD_TRACE
759	184	721	unless $_matched
761	184	721	unless ($_matched or defined $score)
767	0	184	if defined $main::RD_TRACE
774	0	721	if (not defined $return and defined $score)
776	0	0	if defined $main::RD_TRACE
783	0	721	unless defined $return
784	0	721	if (defined $main::RD_TRACE)
809	0	53	if defined $main::RD_TRACE
828	53	0	defined $_[4] ? :
830	53	0	$#arg & 1 ? :
845	0	53	if defined $main::RD_TRACE
858	0	53	if defined $main::RD_TRACE
866	53	0	if $lastsep = $1
	44	9	unless ($text =~ s/\A($Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::skip)/'' if $lastsep = $1;/e and $text =~ /\A(?:"HTML"|HTML)/i)
868	44	0	if defined $lastsep
870	0	44	if defined $main::RD_TRACE
878	0	9	if defined $main::RD_TRACE
885	0	9	if defined $main::RD_TRACE
892	0	9	$_noactions ? :
893	0	9	unless (defined $_tok)
895	0	0	if defined $main::RD_TRACE
899	0	9	if defined $main::RD_TRACE
907	0	9	if defined $main::RD_TRACE
920	44	9	unless $_matched
922	44	9	unless ($_matched or defined $score)
928	0	44	if defined $main::RD_TRACE
935	0	9	if (not defined $return and defined $score)
937	0	0	if defined $main::RD_TRACE
944	0	9	unless defined $return
945	0	9	if (defined $main::RD_TRACE)
970	0	136	if defined $main::RD_TRACE
989	136	0	defined $_[4] ? :
991	136	0	$#arg & 1 ? :
1006	0	136	if defined $main::RD_TRACE
1019	0	136	if defined $main::RD_TRACE
1028	123	13	if $lastsep = $1
	13	123	unless ($text =~ s/\A($Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::skip)/'' if $lastsep = $1;/e and do { $_tok = '('; 1 } and substr($text, 0, length $_tok) eq $_tok and do { substr($text, 0, length $_tok) = ''; 1 })
1033	13	0	if defined $lastsep
1036	0	13	if defined $main::RD_TRACE
1041	0	123	if defined $main::RD_TRACE
1048	0	123	if defined $main::RD_TRACE
1055	0	123	unless (defined($_tok = $thisparser->_parserepeat($text, \&Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::kvpair, 1, 100000000, $_noactions, $expectation, sub { \@arg; } , undef)))
1057	0	0	if defined $main::RD_TRACE
1064	0	123	if defined $main::RD_TRACE
1076	0	123	if defined $main::RD_TRACE
1085	0	123	if $lastsep = $1
	0	123	unless ($text =~ s/\A($Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::skip)/'' if $lastsep = $1;/e and do { $_tok = ')'; 1 } and substr($text, 0, length $_tok) eq $_tok and do { substr($text, 0, length $_tok) = ''; 1 })
1090	0	0	if defined $lastsep
1093	0	0	if defined $main::RD_TRACE
1098	0	123	if defined $main::RD_TRACE
1105	0	123	if defined $main::RD_TRACE
1112	0	123	$_noactions ? :
1113	0	123	unless (defined $_tok)
1115	0	0	if defined $main::RD_TRACE
1119	0	123	if defined $main::RD_TRACE
1127	0	123	if defined $main::RD_TRACE
1140	13	123	unless $_matched
1142	13	123	unless ($_matched or defined $score)
1148	0	13	if defined $main::RD_TRACE
1155	0	123	if (not defined $return and defined $score)
1157	0	0	if defined $main::RD_TRACE
1164	0	123	unless defined $return
1165	0	123	if (defined $main::RD_TRACE)
1190	0	53	if defined $main::RD_TRACE
1209	53	0	defined $_[4] ? :
1211	53	0	$#arg & 1 ? :
1226	0	53	if defined $main::RD_TRACE
1239	0	53	if defined $main::RD_TRACE
1247	0	53	if $lastsep = $1
	31	22	unless ($text =~ s/\A($Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::skip)/'' if $lastsep = $1;/e and $text =~ /\A(?:^"MESSAGE"|^MESSAGE)/i)
1249	31	0	if defined $lastsep
1251	0	31	if defined $main::RD_TRACE
1259	0	22	if defined $main::RD_TRACE
1266	0	22	if defined $main::RD_TRACE
1273	0	22	$_noactions ? :
1274	0	22	unless (defined $_tok)
1276	0	0	if defined $main::RD_TRACE
1280	0	22	if defined $main::RD_TRACE
1288	0	22	if defined $main::RD_TRACE
1301	31	22	unless $_matched
1303	31	22	unless ($_matched or defined $score)
1309	0	31	if defined $main::RD_TRACE
1316	0	22	if (not defined $return and defined $score)
1318	0	0	if defined $main::RD_TRACE
1325	0	22	unless defined $return
1326	0	22	if (defined $main::RD_TRACE)
1351	0	1752	if defined $main::RD_TRACE
1370	1752	0	defined $_[4] ? :
1372	1752	0	$#arg & 1 ? :
1387	0	1752	if defined $main::RD_TRACE
1400	0	1752	if defined $main::RD_TRACE
1408	1473	279	if $lastsep = $1
	1093	659	unless ($text =~ s/\A($Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::skip)/'' if $lastsep = $1;/e and $text =~ /\A(?:^NIL)/i)
1410	1093	0	if defined $lastsep
1412	0	1093	if defined $main::RD_TRACE
1420	0	659	if defined $main::RD_TRACE
1427	0	659	if defined $main::RD_TRACE
1434	0	659	$_noactions ? :
1435	0	659	unless (defined $_tok)
1437	0	0	if defined $main::RD_TRACE
1441	0	659	if defined $main::RD_TRACE
1449	0	659	if defined $main::RD_TRACE
1462	1093	659	unless $_matched
1464	1093	659	unless ($_matched or defined $score)
1470	0	1093	if defined $main::RD_TRACE
1477	0	659	if (not defined $return and defined $score)
1479	0	0	if defined $main::RD_TRACE
1486	0	659	unless defined $return
1487	0	659	if (defined $main::RD_TRACE)
1512	0	256	if defined $main::RD_TRACE
1531	256	0	defined $_[4] ? :
1533	256	0	$#arg & 1 ? :
1548	0	256	if defined $main::RD_TRACE
1561	0	256	if defined $main::RD_TRACE
1569	253	3	if $lastsep = $1
	122	134	unless ($text =~ s/\A($Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::skip)/'' if $lastsep = $1;/e and $text =~ /\A(?:^(\d+))/)
1571	122	0	if defined $lastsep
1573	0	122	if defined $main::RD_TRACE
1581	0	134	if defined $main::RD_TRACE
1588	0	134	if defined $main::RD_TRACE
1595	0	134	$_noactions ? :
1596	0	134	unless (defined $_tok)
1598	0	0	if defined $main::RD_TRACE
1602	0	134	if defined $main::RD_TRACE
1610	0	134	if defined $main::RD_TRACE
1623	122	134	unless $_matched
1625	122	134	unless ($_matched or defined $score)
1631	0	122	if defined $main::RD_TRACE
1638	0	134	if (not defined $return and defined $score)
1640	0	0	if defined $main::RD_TRACE
1647	0	134	unless defined $return
1648	0	134	if (defined $main::RD_TRACE)
1673	0	84	if defined $main::RD_TRACE
1692	84	0	defined $_[4] ? :
1694	84	0	$#arg & 1 ? :
1709	0	84	if defined $main::RD_TRACE
1722	0	84	if defined $main::RD_TRACE
1730	84	0	if $lastsep = $1
	53	31	unless ($text =~ s/\A($Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::skip)/'' if $lastsep = $1;/e and $text =~ /\A(?:^"PLAIN"|^PLAIN)/i)
1732	53	0	if defined $lastsep
1734	0	53	if defined $main::RD_TRACE
1742	0	31	if defined $main::RD_TRACE
1749	0	31	if defined $main::RD_TRACE
1756	0	31	$_noactions ? :
1757	0	31	unless (defined $_tok)
1759	0	0	if defined $main::RD_TRACE
1763	0	31	if defined $main::RD_TRACE
1771	0	31	if defined $main::RD_TRACE
1784	53	31	unless $_matched
1786	53	31	unless ($_matched or defined $score)
1792	0	53	if defined $main::RD_TRACE
1799	0	31	if (not defined $return and defined $score)
1801	0	0	if defined $main::RD_TRACE
1808	0	31	unless defined $return
1809	0	31	if (defined $main::RD_TRACE)
1834	0	22	if defined $main::RD_TRACE
1853	22	0	defined $_[4] ? :
1855	22	0	$#arg & 1 ? :
1870	0	22	if defined $main::RD_TRACE
1883	0	22	if defined $main::RD_TRACE
1891	22	0	if $lastsep = $1
	1	21	unless ($text =~ s/\A($Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::skip)/'' if $lastsep = $1;/e and $text =~ /\A(?:^"RFC822"|^RFC822)/i)
1893	1	0	if defined $lastsep
1895	0	1	if defined $main::RD_TRACE
1903	0	21	if defined $main::RD_TRACE
1910	0	21	if defined $main::RD_TRACE
1917	0	21	$_noactions ? :
1918	0	21	unless (defined $_tok)
1920	0	0	if defined $main::RD_TRACE
1924	0	21	if defined $main::RD_TRACE
1932	0	21	if defined $main::RD_TRACE
1945	1	21	unless $_matched
1947	1	21	unless ($_matched or defined $score)
1953	0	1	if defined $main::RD_TRACE
1960	0	21	if (not defined $return and defined $score)
1962	0	0	if defined $main::RD_TRACE
1969	0	21	unless defined $return
1970	0	21	if (defined $main::RD_TRACE)
1995	0	98	if defined $main::RD_TRACE
2014	98	0	defined $_[4] ? :
2016	98	0	$#arg & 1 ? :
2031	0	98	if defined $main::RD_TRACE
2044	0	98	if defined $main::RD_TRACE
2052	98	0	if $lastsep = $1
	94	4	unless ($text =~ s/\A($Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::skip)/'' if $lastsep = $1;/e and $text =~ /\A(?:^\(\))/i)
2054	94	0	if defined $lastsep
2056	0	94	if defined $main::RD_TRACE
2064	0	4	if defined $main::RD_TRACE
2071	0	4	if defined $main::RD_TRACE
2078	0	4	$_noactions ? :
2079	0	4	unless (defined $_tok)
2081	0	0	if defined $main::RD_TRACE
2085	0	4	if defined $main::RD_TRACE
2093	0	4	if defined $main::RD_TRACE
2106	94	4	unless $_matched
2108	94	4	unless ($_matched or defined $score)
2114	0	94	if defined $main::RD_TRACE
2121	0	4	if (not defined $return and defined $score)
2123	0	0	if defined $main::RD_TRACE
2130	0	4	unless defined $return
2131	0	4	if (defined $main::RD_TRACE)
2156	0	184	if defined $main::RD_TRACE
2175	184	0	defined $_[4] ? :
2177	184	0	$#arg & 1 ? :
2192	0	184	if defined $main::RD_TRACE
2205	0	184	if defined $main::RD_TRACE
2214	18	166	if $lastsep = $1
	183	1	unless ($text =~ s/\A($Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::skip)/'' if $lastsep = $1;/e and do { $_tok = q[']; 1 } and substr($text, 0, length $_tok) eq $_tok and do { substr($text, 0, length $_tok) = ''; 1 })
2219	183	0	if defined $lastsep
2222	0	183	if defined $main::RD_TRACE
2227	0	1	if defined $main::RD_TRACE
2234	0	1	if defined $main::RD_TRACE
2242	0	1	if $lastsep = $1
	0	1	unless ($text =~ s/\A($Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::skip)/'' if $lastsep = $1;/e and $text =~ /\A(?:(?:\\['\\]|[^'])*)/)
2244	0	0	if defined $lastsep
2246	0	0	if defined $main::RD_TRACE
2254	0	1	if defined $main::RD_TRACE
2261	0	1	if defined $main::RD_TRACE
2270	0	1	if $lastsep = $1
	0	1	unless ($text =~ s/\A($Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::skip)/'' if $lastsep = $1;/e and do { $_tok = q[']; 1 } and substr($text, 0, length $_tok) eq $_tok and do { substr($text, 0, length $_tok) = ''; 1 })
2275	0	0	if defined $lastsep
2278	0	0	if defined $main::RD_TRACE
2283	0	1	if defined $main::RD_TRACE
2290	0	1	if defined $main::RD_TRACE
2297	0	1	$_noactions ? :
2298	0	1	unless (defined $_tok)
2300	0	0	if defined $main::RD_TRACE
2304	0	1	if defined $main::RD_TRACE
2312	0	1	if defined $main::RD_TRACE
2325	183	1	unless $_matched
2327	183	1	unless ($_matched or defined $score)
2333	0	183	if defined $main::RD_TRACE
2340	0	1	if (not defined $return and defined $score)
2342	0	0	if defined $main::RD_TRACE
2349	0	1	unless defined $return
2350	0	1	if (defined $main::RD_TRACE)
2375	0	905	if defined $main::RD_TRACE
2394	905	0	defined $_[4] ? :
2396	905	0	$#arg & 1 ? :
2411	0	905	if defined $main::RD_TRACE
2424	0	905	if defined $main::RD_TRACE
2431	184	721	unless (defined($_tok = DOUBLE_QUOTED_STRING($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
2434	0	184	if defined $main::RD_TRACE
2442	0	721	if defined $main::RD_TRACE
2454	0	721	if defined $main::RD_TRACE
2467	184	721	unless $_matched
2472	0	184	if defined $main::RD_TRACE
2485	0	184	if defined $main::RD_TRACE
2492	183	1	unless (defined($_tok = SINGLE_QUOTED_STRING($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
2495	0	183	if defined $main::RD_TRACE
2503	0	1	if defined $main::RD_TRACE
2515	0	1	if defined $main::RD_TRACE
2528	183	722	unless $_matched
2533	0	183	if defined $main::RD_TRACE
2546	0	183	if defined $main::RD_TRACE
2553	183	0	unless (defined($_tok = BARESTRING($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
2556	0	183	if defined $main::RD_TRACE
2564	0	0	if defined $main::RD_TRACE
2576	0	0	if defined $main::RD_TRACE
2589	183	722	unless $_matched
2591	183	722	unless ($_matched or defined $score)
2597	0	183	if defined $main::RD_TRACE
2604	0	722	if (not defined $return and defined $score)
2606	0	0	if defined $main::RD_TRACE
2613	722	0	unless defined $return
2614	0	722	if (defined $main::RD_TRACE)
2639	0	58	if defined $main::RD_TRACE
2658	58	0	defined $_[4] ? :
2660	58	0	$#arg & 1 ? :
2675	0	58	if defined $main::RD_TRACE
2688	0	58	if defined $main::RD_TRACE
2697	1	57	if $lastsep = $1
	57	1	unless ($text =~ s/\A($Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::skip)/'' if $lastsep = $1;/e and do { $_tok = '('; 1 } and substr($text, 0, length $_tok) eq $_tok and do { substr($text, 0, length $_tok) = ''; 1 })
2702	57	0	if defined $lastsep
2705	0	57	if defined $main::RD_TRACE
2710	0	1	if defined $main::RD_TRACE
2717	0	1	if defined $main::RD_TRACE
2724	0	1	unless (defined($_tok = $thisparser->_parserepeat($text, \&Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::STRING, 1, 100000000, $_noactions, $expectation, sub { \@arg; } , undef)))
2726	0	0	if defined $main::RD_TRACE
2733	0	1	if defined $main::RD_TRACE
2745	0	1	if defined $main::RD_TRACE
2754	0	1	if $lastsep = $1
	0	1	unless ($text =~ s/\A($Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::skip)/'' if $lastsep = $1;/e and do { $_tok = ')'; 1 } and substr($text, 0, length $_tok) eq $_tok and do { substr($text, 0, length $_tok) = ''; 1 })
2759	0	0	if defined $lastsep
2762	0	0	if defined $main::RD_TRACE
2767	0	1	if defined $main::RD_TRACE
2774	0	1	if defined $main::RD_TRACE
2781	0	1	$_noactions ? :
2782	0	1	unless (defined $_tok)
2784	0	0	if defined $main::RD_TRACE
2788	0	1	if defined $main::RD_TRACE
2796	0	1	if defined $main::RD_TRACE
2809	57	1	unless $_matched
2811	57	1	unless ($_matched or defined $score)
2817	0	57	if defined $main::RD_TRACE
2824	0	1	if (not defined $return and defined $score)
2826	0	0	if defined $main::RD_TRACE
2833	0	1	unless defined $return
2834	0	1	if (defined $main::RD_TRACE)
2859	0	94	if defined $main::RD_TRACE
2878	94	0	defined $_[4] ? :
2880	94	0	$#arg & 1 ? :
2895	0	94	if defined $main::RD_TRACE
2908	0	94	if defined $main::RD_TRACE
2916	0	94	if $lastsep = $1
	53	41	unless ($text =~ s/\A($Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::skip)/'' if $lastsep = $1;/e and $text =~ /\A(?:^"TEXT"|^TEXT)/i)
2918	53	0	if defined $lastsep
2920	0	53	if defined $main::RD_TRACE
2928	0	41	if defined $main::RD_TRACE
2935	0	41	if defined $main::RD_TRACE
2942	0	41	$_noactions ? :
2943	0	41	unless (defined $_tok)
2945	0	0	if defined $main::RD_TRACE
2949	0	41	if defined $main::RD_TRACE
2957	0	41	if defined $main::RD_TRACE
2970	53	41	unless $_matched
2972	53	41	unless ($_matched or defined $score)
2978	0	53	if defined $main::RD_TRACE
2985	0	41	if (not defined $return and defined $score)
2987	0	0	if defined $main::RD_TRACE
2994	0	41	unless defined $return
2995	0	41	if (defined $main::RD_TRACE)
3020	0	188	if defined $main::RD_TRACE
3039	188	0	defined $_[4] ? :
3041	188	0	$#arg & 1 ? :
3056	0	188	if defined $main::RD_TRACE
3069	0	188	if defined $main::RD_TRACE
3078	0	188	if $lastsep = $1
	94	94	unless ($text =~ s/\A($Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::skip)/'' if $lastsep = $1;/e and do { $_tok = '('; 1 } and substr($text, 0, length $_tok) eq $_tok and do { substr($text, 0, length $_tok) = ''; 1 })
3083	94	0	if defined $lastsep
3086	0	94	if defined $main::RD_TRACE
3091	0	94	if defined $main::RD_TRACE
3098	0	94	if defined $main::RD_TRACE
3105	0	94	unless (defined($_tok = personalname($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
3108	0	0	if defined $main::RD_TRACE
3116	0	94	if defined $main::RD_TRACE
3128	0	94	if defined $main::RD_TRACE
3135	0	94	unless (defined($_tok = sourceroute($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
3138	0	0	if defined $main::RD_TRACE
3146	0	94	if defined $main::RD_TRACE
3158	0	94	if defined $main::RD_TRACE
3165	0	94	unless (defined($_tok = mailboxname($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
3168	0	0	if defined $main::RD_TRACE
3176	0	94	if defined $main::RD_TRACE
3188	0	94	if defined $main::RD_TRACE
3195	0	94	unless (defined($_tok = hostname($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
3198	0	0	if defined $main::RD_TRACE
3206	0	94	if defined $main::RD_TRACE
3218	0	94	if defined $main::RD_TRACE
3227	0	94	if $lastsep = $1
	0	94	unless ($text =~ s/\A($Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::skip)/'' if $lastsep = $1;/e and do { $_tok = ')'; 1 } and substr($text, 0, length $_tok) eq $_tok and do { substr($text, 0, length $_tok) = ''; 1 })
3232	0	0	if defined $lastsep
3235	0	0	if defined $main::RD_TRACE
3240	0	94	if defined $main::RD_TRACE
3247	0	94	if defined $main::RD_TRACE
3254	0	94	$_noactions ? :
3260	0	94	unless (defined $_tok)
3262	0	0	if defined $main::RD_TRACE
3266	0	94	if defined $main::RD_TRACE
3274	0	94	if defined $main::RD_TRACE
3287	94	94	unless $_matched
3289	94	94	unless ($_matched or defined $score)
3295	0	94	if defined $main::RD_TRACE
3302	0	94	if (not defined $return and defined $score)
3304	0	0	if defined $main::RD_TRACE
3311	94	0	unless defined $return
3312	0	94	if (defined $main::RD_TRACE)
3337	0	53	if defined $main::RD_TRACE
3356	53	0	defined $_[4] ? :
3358	53	0	$#arg & 1 ? :
3373	0	53	if defined $main::RD_TRACE
3386	0	53	if defined $main::RD_TRACE
3393	0	53	unless (defined($_tok = bodysubtype($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
3396	0	0	if defined $main::RD_TRACE
3404	0	53	if defined $main::RD_TRACE
3416	0	53	if defined $main::RD_TRACE
3423	0	53	unless (defined($_tok = $thisparser->_parserepeat($text, \&Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::bodyparms, 0, 1, $_noactions, $expectation, sub { \@arg; } , undef)))
3425	0	0	if defined $main::RD_TRACE
3432	0	53	if defined $main::RD_TRACE
3444	0	53	if defined $main::RD_TRACE
3451	0	53	unless (defined($_tok = $thisparser->_parserepeat($text, \&Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::bodyid, 0, 1, $_noactions, $expectation, sub { \@arg; } , undef)))
3453	0	0	if defined $main::RD_TRACE
3460	0	53	if defined $main::RD_TRACE
3472	0	53	if defined $main::RD_TRACE
3479	0	53	unless (defined($_tok = $thisparser->_parserepeat($text, \&Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::bodydesc, 0, 1, $_noactions, $expectation, sub { \@arg; } , undef)))
3481	0	0	if defined $main::RD_TRACE
3488	0	53	if defined $main::RD_TRACE
3500	0	53	if defined $main::RD_TRACE
3507	0	53	unless (defined($_tok = $thisparser->_parserepeat($text, \&Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::bodyenc, 0, 1, $_noactions, $expectation, sub { \@arg; } , undef)))
3509	0	0	if defined $main::RD_TRACE
3516	0	53	if defined $main::RD_TRACE
3528	0	53	if defined $main::RD_TRACE
3535	0	53	unless (defined($_tok = $thisparser->_parserepeat($text, \&Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::bodysize, 0, 1, $_noactions, $expectation, sub { \@arg; } , undef)))
3537	0	0	if defined $main::RD_TRACE
3544	0	53	if defined $main::RD_TRACE
3556	0	53	if defined $main::RD_TRACE
3563	0	53	$_noactions ? :
3568	0	53	unless (defined $_tok)
3570	0	0	if defined $main::RD_TRACE
3574	0	53	if defined $main::RD_TRACE
3582	0	53	if defined $main::RD_TRACE
3595	0	53	unless $_matched
3597	0	53	unless ($_matched or defined $score)
3603	0	0	if defined $main::RD_TRACE
3610	0	53	if (not defined $return and defined $score)
3612	0	0	if defined $main::RD_TRACE
3619	0	53	unless defined $return
3620	0	53	if (defined $main::RD_TRACE)
3645	0	24	if defined $main::RD_TRACE
3664	24	0	defined $_[4] ? :
3666	24	0	$#arg & 1 ? :
3681	0	24	if defined $main::RD_TRACE
3694	0	24	if defined $main::RD_TRACE
3701	0	24	unless (defined($_tok = ADDRESSES($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
3704	0	0	if defined $main::RD_TRACE
3712	0	24	if defined $main::RD_TRACE
3724	0	24	if defined $main::RD_TRACE
3737	0	24	unless $_matched
3739	0	24	unless ($_matched or defined $score)
3745	0	0	if defined $main::RD_TRACE
3752	0	24	if (not defined $return and defined $score)
3754	0	0	if defined $main::RD_TRACE
3761	24	0	unless defined $return
3762	0	24	if (defined $main::RD_TRACE)
3787	0	74	if defined $main::RD_TRACE
3806	74	0	defined $_[4] ? :
3808	74	0	$#arg & 1 ? :
3823	0	74	if defined $main::RD_TRACE
3836	0	74	if defined $main::RD_TRACE
3843	8	66	unless (defined($_tok = NIL($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
3846	0	8	if defined $main::RD_TRACE
3854	0	66	if defined $main::RD_TRACE
3866	0	66	if defined $main::RD_TRACE
3879	8	66	unless $_matched
3884	0	8	if defined $main::RD_TRACE
3897	0	8	if defined $main::RD_TRACE
3904	7	1	unless (defined($_tok = STRING($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
3907	0	7	if defined $main::RD_TRACE
3915	0	1	if defined $main::RD_TRACE
3927	0	1	if defined $main::RD_TRACE
3940	7	67	unless $_matched
3942	7	67	unless ($_matched or defined $score)
3948	0	7	if defined $main::RD_TRACE
3955	0	67	if (not defined $return and defined $score)
3957	0	0	if defined $main::RD_TRACE
3964	67	0	unless defined $return
3965	0	67	if (defined $main::RD_TRACE)
3990	0	74	if defined $main::RD_TRACE
4009	74	0	defined $_[4] ? :
4011	74	0	$#arg & 1 ? :
4026	0	74	if defined $main::RD_TRACE
4039	0	74	if defined $main::RD_TRACE
4047	74	0	if $lastsep = $1
	0	74	if ($text =~ s/\A($Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::skip)/'' if $lastsep = $1;/e and $text =~ /\A(?:[()])/)
4051	0	0	if defined $main::RD_TRACE
4059	0	74	if defined $main::RD_TRACE
4066	0	74	if defined $main::RD_TRACE
4073	21	53	unless (defined($_tok = NIL($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
4076	0	21	if defined $main::RD_TRACE
4084	0	53	if defined $main::RD_TRACE
4096	0	53	if defined $main::RD_TRACE
4109	21	53	unless $_matched
4114	0	21	if defined $main::RD_TRACE
4127	0	21	if defined $main::RD_TRACE
4134	0	21	unless (defined($_tok = STRING($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
4137	0	0	if defined $main::RD_TRACE
4145	0	21	if defined $main::RD_TRACE
4157	0	21	if defined $main::RD_TRACE
4170	0	74	unless $_matched
4172	0	74	unless ($_matched or defined $score)
4178	0	0	if defined $main::RD_TRACE
4185	0	74	if (not defined $return and defined $score)
4187	0	0	if defined $main::RD_TRACE
4194	74	0	unless defined $return
4195	0	74	if (defined $main::RD_TRACE)
4220	0	105	if defined $main::RD_TRACE
4239	105	0	defined $_[4] ? :
4241	105	0	$#arg & 1 ? :
4256	0	105	if defined $main::RD_TRACE
4269	0	105	if defined $main::RD_TRACE
4276	38	67	unless (defined($_tok = NIL($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
4279	0	38	if defined $main::RD_TRACE
4287	0	67	if defined $main::RD_TRACE
4299	0	67	if defined $main::RD_TRACE
4312	38	67	unless $_matched
4317	0	38	if defined $main::RD_TRACE
4330	0	38	if defined $main::RD_TRACE
4337	10	28	unless (defined($_tok = KVPAIRS($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
4340	0	10	if defined $main::RD_TRACE
4348	0	28	if defined $main::RD_TRACE
4360	0	28	if defined $main::RD_TRACE
4373	10	95	unless $_matched
4375	10	95	unless ($_matched or defined $score)
4381	0	10	if defined $main::RD_TRACE
4388	0	95	if (not defined $return and defined $score)
4390	0	0	if defined $main::RD_TRACE
4397	95	0	unless defined $return
4398	0	95	if (defined $main::RD_TRACE)
4423	0	74	if defined $main::RD_TRACE
4442	74	0	defined $_[4] ? :
4444	74	0	$#arg & 1 ? :
4459	0	74	if defined $main::RD_TRACE
4472	0	74	if defined $main::RD_TRACE
4479	74	0	unless (defined($_tok = NIL($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
4482	0	74	if defined $main::RD_TRACE
4490	0	0	if defined $main::RD_TRACE
4502	0	0	if defined $main::RD_TRACE
4515	74	0	unless $_matched
4520	0	74	if defined $main::RD_TRACE
4533	0	74	if defined $main::RD_TRACE
4540	0	74	unless (defined($_tok = STRING($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
4543	0	0	if defined $main::RD_TRACE
4551	0	74	if defined $main::RD_TRACE
4563	0	74	if defined $main::RD_TRACE
4576	0	74	unless $_matched
4581	0	0	if defined $main::RD_TRACE
4594	0	0	if defined $main::RD_TRACE
4601	0	0	unless (defined($_tok = KVPAIRS($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
4604	0	0	if defined $main::RD_TRACE
4612	0	0	if defined $main::RD_TRACE
4624	0	0	if defined $main::RD_TRACE
4637	0	74	unless $_matched
4639	0	74	unless ($_matched or defined $score)
4645	0	0	if defined $main::RD_TRACE
4652	0	74	if (not defined $return and defined $score)
4654	0	0	if defined $main::RD_TRACE
4661	74	0	unless defined $return
4662	0	74	if (defined $main::RD_TRACE)
4687	0	77	if defined $main::RD_TRACE
4706	77	0	defined $_[4] ? :
4708	77	0	$#arg & 1 ? :
4723	0	77	if defined $main::RD_TRACE
4736	0	77	if defined $main::RD_TRACE
4743	72	5	unless (defined($_tok = NIL($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
4746	0	72	if defined $main::RD_TRACE
4754	0	5	if defined $main::RD_TRACE
4766	0	5	if defined $main::RD_TRACE
4779	72	5	unless $_matched
4784	0	72	if defined $main::RD_TRACE
4797	0	72	if defined $main::RD_TRACE
4804	72	0	unless (defined($_tok = STRING($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
4807	0	72	if defined $main::RD_TRACE
4815	0	0	if defined $main::RD_TRACE
4827	0	0	if defined $main::RD_TRACE
4840	72	5	unless $_matched
4842	72	5	unless ($_matched or defined $score)
4848	0	72	if defined $main::RD_TRACE
4855	0	5	if (not defined $return and defined $score)
4857	0	0	if defined $main::RD_TRACE
4864	5	0	unless defined $return
4865	0	5	if (defined $main::RD_TRACE)
4890	0	105	if defined $main::RD_TRACE
4909	105	0	defined $_[4] ? :
4911	105	0	$#arg & 1 ? :
4926	0	105	if defined $main::RD_TRACE
4939	0	105	if defined $main::RD_TRACE
4946	47	58	unless (defined($_tok = NIL($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
4949	0	47	if defined $main::RD_TRACE
4957	0	58	if defined $main::RD_TRACE
4969	0	58	if defined $main::RD_TRACE
4982	47	58	unless $_matched
4987	0	47	if defined $main::RD_TRACE
5000	0	47	if defined $main::RD_TRACE
5007	47	0	unless (defined($_tok = STRING($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
5010	0	47	if defined $main::RD_TRACE
5018	0	0	if defined $main::RD_TRACE
5030	0	0	if defined $main::RD_TRACE
5043	47	58	unless $_matched
5048	0	47	if defined $main::RD_TRACE
5061	0	47	if defined $main::RD_TRACE
5068	47	0	unless (defined($_tok = STRINGS($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
5071	0	47	if defined $main::RD_TRACE
5079	0	0	if defined $main::RD_TRACE
5091	0	0	if defined $main::RD_TRACE
5104	47	58	unless $_matched
5106	47	58	unless ($_matched or defined $score)
5112	0	47	if defined $main::RD_TRACE
5119	0	58	if (not defined $return and defined $score)
5121	0	0	if defined $main::RD_TRACE
5128	58	0	unless defined $return
5129	0	58	if (defined $main::RD_TRACE)
5154	0	74	if defined $main::RD_TRACE
5173	74	0	defined $_[4] ? :
5175	74	0	$#arg & 1 ? :
5190	0	74	if defined $main::RD_TRACE
5203	0	74	if defined $main::RD_TRACE
5211	74	0	if $lastsep = $1
	0	74	if ($text =~ s/\A($Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::skip)/'' if $lastsep = $1;/e and $text =~ /\A(?:[()])/)
5215	0	0	if defined $main::RD_TRACE
5223	0	74	if defined $main::RD_TRACE
5230	0	74	if defined $main::RD_TRACE
5237	2	72	unless (defined($_tok = NIL($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
5240	0	2	if defined $main::RD_TRACE
5248	0	72	if defined $main::RD_TRACE
5260	0	72	if defined $main::RD_TRACE
5273	2	72	unless $_matched
5278	0	2	if defined $main::RD_TRACE
5291	0	2	if defined $main::RD_TRACE
5298	0	2	unless (defined($_tok = STRING($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
5301	0	0	if defined $main::RD_TRACE
5309	0	2	if defined $main::RD_TRACE
5321	0	2	if defined $main::RD_TRACE
5334	0	74	unless $_matched
5336	0	74	unless ($_matched or defined $score)
5342	0	0	if defined $main::RD_TRACE
5349	0	74	if (not defined $return and defined $score)
5351	0	0	if defined $main::RD_TRACE
5358	74	0	unless defined $return
5359	0	74	if (defined $main::RD_TRACE)
5384	0	105	if defined $main::RD_TRACE
5403	105	0	defined $_[4] ? :
5405	105	0	$#arg & 1 ? :
5420	0	105	if defined $main::RD_TRACE
5433	0	105	if defined $main::RD_TRACE
5440	11	94	unless (defined($_tok = NIL($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
5443	0	11	if defined $main::RD_TRACE
5451	0	94	if defined $main::RD_TRACE
5463	0	94	if defined $main::RD_TRACE
5476	11	94	unless $_matched
5481	0	11	if defined $main::RD_TRACE
5494	0	11	if defined $main::RD_TRACE
5501	11	0	unless (defined($_tok = STRING($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
5504	0	11	if defined $main::RD_TRACE
5512	0	0	if defined $main::RD_TRACE
5524	0	0	if defined $main::RD_TRACE
5537	11	94	unless $_matched
5542	0	11	if defined $main::RD_TRACE
5555	0	11	if defined $main::RD_TRACE
5562	10	1	unless (defined($_tok = STRINGS($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
5565	0	10	if defined $main::RD_TRACE
5573	0	1	if defined $main::RD_TRACE
5585	0	1	if defined $main::RD_TRACE
5598	10	95	unless $_matched
5600	10	95	unless ($_matched or defined $score)
5606	0	10	if defined $main::RD_TRACE
5613	0	95	if (not defined $return and defined $score)
5615	0	0	if defined $main::RD_TRACE
5622	95	0	unless defined $return
5623	0	95	if (defined $main::RD_TRACE)
5648	0	31	if defined $main::RD_TRACE
5667	31	0	defined $_[4] ? :
5669	31	0	$#arg & 1 ? :
5684	0	31	if defined $main::RD_TRACE
5697	0	31	if defined $main::RD_TRACE
5704	9	22	unless (defined($_tok = NIL($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
5707	0	9	if defined $main::RD_TRACE
5715	0	22	if defined $main::RD_TRACE
5727	0	22	if defined $main::RD_TRACE
5740	9	22	unless $_matched
5745	0	9	if defined $main::RD_TRACE
5758	0	9	if defined $main::RD_TRACE
5765	9	0	unless (defined($_tok = STRING($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
5768	0	9	if defined $main::RD_TRACE
5776	0	0	if defined $main::RD_TRACE
5788	0	0	if defined $main::RD_TRACE
5801	9	22	unless $_matched
5803	9	22	unless ($_matched or defined $score)
5809	0	9	if defined $main::RD_TRACE
5816	0	22	if (not defined $return and defined $score)
5818	0	0	if defined $main::RD_TRACE
5825	22	0	unless defined $return
5826	0	22	if (defined $main::RD_TRACE)
5851	0	105	if defined $main::RD_TRACE
5870	105	0	defined $_[4] ? :
5872	105	0	$#arg & 1 ? :
5887	0	105	if defined $main::RD_TRACE
5900	0	105	if defined $main::RD_TRACE
5907	82	23	unless (defined($_tok = NIL($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
5910	0	82	if defined $main::RD_TRACE
5918	0	23	if defined $main::RD_TRACE
5930	0	23	if defined $main::RD_TRACE
5943	82	23	unless $_matched
5948	0	82	if defined $main::RD_TRACE
5961	0	82	if defined $main::RD_TRACE
5968	3	79	unless (defined($_tok = KVPAIRS($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
5971	0	3	if defined $main::RD_TRACE
5979	0	79	if defined $main::RD_TRACE
5991	0	79	if defined $main::RD_TRACE
6004	3	102	unless $_matched
6006	3	102	unless ($_matched or defined $score)
6012	0	3	if defined $main::RD_TRACE
6019	0	102	if (not defined $return and defined $score)
6021	0	0	if defined $main::RD_TRACE
6028	102	0	unless defined $return
6029	0	102	if (defined $main::RD_TRACE)
6054	0	74	if defined $main::RD_TRACE
6073	74	0	defined $_[4] ? :
6075	74	0	$#arg & 1 ? :
6090	0	74	if defined $main::RD_TRACE
6103	0	74	if defined $main::RD_TRACE
6111	74	0	if $lastsep = $1
	0	74	if ($text =~ s/\A($Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::skip)/'' if $lastsep = $1;/e and $text =~ /\A(?:[()])/)
6115	0	0	if defined $main::RD_TRACE
6123	0	74	if defined $main::RD_TRACE
6130	0	74	if defined $main::RD_TRACE
6137	74	0	unless (defined($_tok = NIL($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
6140	0	74	if defined $main::RD_TRACE
6148	0	0	if defined $main::RD_TRACE
6160	0	0	if defined $main::RD_TRACE
6173	74	0	unless $_matched
6178	0	74	if defined $main::RD_TRACE
6191	0	74	if defined $main::RD_TRACE
6198	0	74	unless (defined($_tok = NUMBER($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
6201	0	0	if defined $main::RD_TRACE
6209	0	74	if defined $main::RD_TRACE
6221	0	74	if defined $main::RD_TRACE
6234	0	74	unless $_matched
6236	0	74	unless ($_matched or defined $score)
6242	0	0	if defined $main::RD_TRACE
6249	0	74	if (not defined $return and defined $score)
6251	0	0	if defined $main::RD_TRACE
6258	74	0	unless defined $return
6259	0	74	if (defined $main::RD_TRACE)
6284	0	21	if defined $main::RD_TRACE
6303	21	0	defined $_[4] ? :
6305	21	0	$#arg & 1 ? :
6320	0	21	if defined $main::RD_TRACE
6333	0	21	if defined $main::RD_TRACE
6342	20	1	if $lastsep = $1
	1	20	unless ($text =~ s/\A($Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::skip)/'' if $lastsep = $1;/e and do { $_tok = '('; 1 } and substr($text, 0, length $_tok) eq $_tok and do { substr($text, 0, length $_tok) = ''; 1 })
6347	1	0	if defined $lastsep
6350	0	1	if defined $main::RD_TRACE
6355	0	20	if defined $main::RD_TRACE
6362	0	20	if defined $main::RD_TRACE
6369	0	20	unless (defined($_tok = $thisparser->_parserepeat($text, \&Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::part, 1, 100000000, $_noactions, $expectation, sub { \@arg; } , undef)))
6371	0	0	if defined $main::RD_TRACE
6378	0	20	if defined $main::RD_TRACE
6390	0	20	if defined $main::RD_TRACE
6399	0	20	if $lastsep = $1
	0	20	unless ($text =~ s/\A($Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::skip)/'' if $lastsep = $1;/e and do { $_tok = ')'; 1 } and substr($text, 0, length $_tok) eq $_tok and do { substr($text, 0, length $_tok) = ''; 1 })
6404	0	0	if defined $lastsep
6407	0	0	if defined $main::RD_TRACE
6412	0	20	if defined $main::RD_TRACE
6419	0	20	if defined $main::RD_TRACE
6426	0	20	$_noactions ? :
6427	0	20	unless (defined $_tok)
6429	0	0	if defined $main::RD_TRACE
6433	0	20	if defined $main::RD_TRACE
6441	0	20	if defined $main::RD_TRACE
6454	1	20	unless $_matched
6456	1	20	unless ($_matched or defined $score)
6462	0	1	if defined $main::RD_TRACE
6469	0	20	if (not defined $return and defined $score)
6471	0	0	if defined $main::RD_TRACE
6478	0	20	unless defined $return
6479	0	20	if (defined $main::RD_TRACE)
6504	0	84	if defined $main::RD_TRACE
6523	84	0	defined $_[4] ? :
6525	84	0	$#arg & 1 ? :
6540	0	84	if defined $main::RD_TRACE
6553	0	84	if defined $main::RD_TRACE
6560	53	31	unless (defined($_tok = PLAIN($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
6563	0	53	if defined $main::RD_TRACE
6571	0	31	if defined $main::RD_TRACE
6583	0	31	if defined $main::RD_TRACE
6596	53	31	unless $_matched
6601	0	53	if defined $main::RD_TRACE
6614	0	53	if defined $main::RD_TRACE
6621	44	9	unless (defined($_tok = HTML($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
6624	0	44	if defined $main::RD_TRACE
6632	0	9	if defined $main::RD_TRACE
6644	0	9	if defined $main::RD_TRACE
6657	44	40	unless $_matched
6662	0	44	if defined $main::RD_TRACE
6675	0	44	if defined $main::RD_TRACE
6682	44	0	unless (defined($_tok = NIL($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
6685	0	44	if defined $main::RD_TRACE
6693	0	0	if defined $main::RD_TRACE
6705	0	0	if defined $main::RD_TRACE
6718	44	40	unless $_matched
6723	0	44	if defined $main::RD_TRACE
6736	0	44	if defined $main::RD_TRACE
6743	0	44	unless (defined($_tok = STRING($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
6746	0	0	if defined $main::RD_TRACE
6754	0	44	if defined $main::RD_TRACE
6766	0	44	if defined $main::RD_TRACE
6779	0	84	unless $_matched
6781	0	84	unless ($_matched or defined $score)
6787	0	0	if defined $main::RD_TRACE
6794	0	84	if (not defined $return and defined $score)
6796	0	0	if defined $main::RD_TRACE
6803	84	0	unless defined $return
6804	0	84	if (defined $main::RD_TRACE)
6829	0	32	if defined $main::RD_TRACE
6848	32	0	defined $_[4] ? :
6850	32	0	$#arg & 1 ? :
6865	0	32	if defined $main::RD_TRACE
6878	0	32	if defined $main::RD_TRACE
6885	20	12	unless (defined($_tok = STRING($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
6888	0	20	if defined $main::RD_TRACE
6896	0	12	if defined $main::RD_TRACE
6908	0	12	if defined $main::RD_TRACE
6921	20	12	unless $_matched
6923	20	12	unless ($_matched or defined $score)
6929	0	20	if defined $main::RD_TRACE
6936	0	12	if (not defined $return and defined $score)
6938	0	0	if defined $main::RD_TRACE
6945	12	0	unless defined $return
6946	0	12	if (defined $main::RD_TRACE)
6971	0	24	if defined $main::RD_TRACE
6990	24	0	defined $_[4] ? :
6992	24	0	$#arg & 1 ? :
7007	0	24	if defined $main::RD_TRACE
7020	0	24	if defined $main::RD_TRACE
7027	0	24	unless (defined($_tok = ADDRESSES($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
7030	0	0	if defined $main::RD_TRACE
7038	0	24	if defined $main::RD_TRACE
7050	0	24	if defined $main::RD_TRACE
7063	0	24	unless $_matched
7065	0	24	unless ($_matched or defined $score)
7071	0	0	if defined $main::RD_TRACE
7078	0	24	if (not defined $return and defined $score)
7080	0	0	if defined $main::RD_TRACE
7087	24	0	unless defined $return
7088	0	24	if (defined $main::RD_TRACE)
7113	0	24	if defined $main::RD_TRACE
7132	24	0	defined $_[4] ? :
7134	24	0	$#arg & 1 ? :
7149	0	24	if defined $main::RD_TRACE
7162	0	24	if defined $main::RD_TRACE
7169	24	0	unless (defined($_tok = NIL($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
7172	0	24	if defined $main::RD_TRACE
7180	0	0	if defined $main::RD_TRACE
7192	0	0	if defined $main::RD_TRACE
7205	24	0	unless $_matched
7210	0	24	if defined $main::RD_TRACE
7223	0	24	if defined $main::RD_TRACE
7230	0	24	unless (defined($_tok = STRING($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
7233	0	0	if defined $main::RD_TRACE
7241	0	24	if defined $main::RD_TRACE
7253	0	24	if defined $main::RD_TRACE
7266	0	24	unless $_matched
7268	0	24	unless ($_matched or defined $score)
7274	0	0	if defined $main::RD_TRACE
7281	0	24	if (not defined $return and defined $score)
7283	0	0	if defined $main::RD_TRACE
7290	24	0	unless defined $return
7291	0	24	if (defined $main::RD_TRACE)
7316	0	1	if defined $main::RD_TRACE
7335	1	0	defined $_[4] ? :
7337	1	0	$#arg & 1 ? :
7352	0	1	if defined $main::RD_TRACE
7365	0	1	if defined $main::RD_TRACE
7373	0	1	if $lastsep = $1
	0	1	unless ($text =~ s/\A($Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::skip)/'' if $lastsep = $1;/e and $text =~ /\A(?:.*?\(.*?ENVELOPE)/)
7375	0	0	if defined $lastsep
7377	0	0	if defined $main::RD_TRACE
7385	0	1	if defined $main::RD_TRACE
7392	0	1	if defined $main::RD_TRACE
7399	0	1	unless (defined($_tok = envelopestruct($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
7402	0	0	if defined $main::RD_TRACE
7410	0	1	if defined $main::RD_TRACE
7422	0	1	if defined $main::RD_TRACE
7430	0	1	if $lastsep = $1
	0	1	unless ($text =~ s/\A($Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::skip)/'' if $lastsep = $1;/e and $text =~ /\A(?:.*\))/)
7432	0	0	if defined $lastsep
7434	0	0	if defined $main::RD_TRACE
7442	0	1	if defined $main::RD_TRACE
7449	0	1	if defined $main::RD_TRACE
7456	0	1	$_noactions ? :
7457	0	1	unless (defined $_tok)
7459	0	0	if defined $main::RD_TRACE
7463	0	1	if defined $main::RD_TRACE
7471	0	1	if defined $main::RD_TRACE
7484	0	1	unless $_matched
7486	0	1	unless ($_matched or defined $score)
7492	0	0	if defined $main::RD_TRACE
7499	0	1	if (not defined $return and defined $score)
7501	0	0	if defined $main::RD_TRACE
7508	0	1	unless defined $return
7509	0	1	if (defined $main::RD_TRACE)
7534	0	25	if defined $main::RD_TRACE
7553	25	0	defined $_[4] ? :
7555	25	0	$#arg & 1 ? :
7570	0	25	if defined $main::RD_TRACE
7583	0	25	if defined $main::RD_TRACE
7592	21	4	if $lastsep = $1
	1	24	unless ($text =~ s/\A($Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::skip)/'' if $lastsep = $1;/e and do { $_tok = '('; 1 } and substr($text, 0, length $_tok) eq $_tok and do { substr($text, 0, length $_tok) = ''; 1 })
7597	1	0	if defined $lastsep
7600	0	1	if defined $main::RD_TRACE
7605	0	24	if defined $main::RD_TRACE
7612	0	24	if defined $main::RD_TRACE
7619	0	24	unless (defined($_tok = date($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
7622	0	0	if defined $main::RD_TRACE
7630	0	24	if defined $main::RD_TRACE
7642	0	24	if defined $main::RD_TRACE
7649	0	24	unless (defined($_tok = subject($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
7652	0	0	if defined $main::RD_TRACE
7660	0	24	if defined $main::RD_TRACE
7672	0	24	if defined $main::RD_TRACE
7679	0	24	unless (defined($_tok = from($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
7682	0	0	if defined $main::RD_TRACE
7690	0	24	if defined $main::RD_TRACE
7702	0	24	if defined $main::RD_TRACE
7709	0	24	unless (defined($_tok = sender($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
7712	0	0	if defined $main::RD_TRACE
7720	0	24	if defined $main::RD_TRACE
7732	0	24	if defined $main::RD_TRACE
7739	0	24	unless (defined($_tok = replyto($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
7742	0	0	if defined $main::RD_TRACE
7750	0	24	if defined $main::RD_TRACE
7762	0	24	if defined $main::RD_TRACE
7769	0	24	unless (defined($_tok = to($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
7772	0	0	if defined $main::RD_TRACE
7780	0	24	if defined $main::RD_TRACE
7792	0	24	if defined $main::RD_TRACE
7799	0	24	unless (defined($_tok = cc($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
7802	0	0	if defined $main::RD_TRACE
7810	0	24	if defined $main::RD_TRACE
7822	0	24	if defined $main::RD_TRACE
7829	0	24	unless (defined($_tok = bcc($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
7832	0	0	if defined $main::RD_TRACE
7840	0	24	if defined $main::RD_TRACE
7852	0	24	if defined $main::RD_TRACE
7859	0	24	unless (defined($_tok = inreplyto($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
7862	0	0	if defined $main::RD_TRACE
7870	0	24	if defined $main::RD_TRACE
7882	0	24	if defined $main::RD_TRACE
7889	0	24	unless (defined($_tok = messageid($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
7892	0	0	if defined $main::RD_TRACE
7900	0	24	if defined $main::RD_TRACE
7912	0	24	if defined $main::RD_TRACE
7921	0	24	if $lastsep = $1
	0	24	unless ($text =~ s/\A($Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::skip)/'' if $lastsep = $1;/e and do { $_tok = ')'; 1 } and substr($text, 0, length $_tok) eq $_tok and do { substr($text, 0, length $_tok) = ''; 1 })
7926	0	0	if defined $lastsep
7929	0	0	if defined $main::RD_TRACE
7934	0	24	if defined $main::RD_TRACE
7941	0	24	if defined $main::RD_TRACE
7948	0	24	$_noactions ? :
7954	0	24	unless (defined $_tok)
7956	0	0	if defined $main::RD_TRACE
7960	0	24	if defined $main::RD_TRACE
7968	0	24	if defined $main::RD_TRACE
7981	1	24	unless $_matched
7983	1	24	unless ($_matched or defined $score)
7989	0	1	if defined $main::RD_TRACE
7996	0	24	if (not defined $return and defined $score)
7998	0	0	if defined $main::RD_TRACE
8005	0	24	unless defined $return
8006	0	24	if (defined $main::RD_TRACE)
8031	0	24	if defined $main::RD_TRACE
8050	24	0	defined $_[4] ? :
8052	24	0	$#arg & 1 ? :
8067	0	24	if defined $main::RD_TRACE
8080	0	24	if defined $main::RD_TRACE
8087	0	24	unless (defined($_tok = ADDRESSES($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
8090	0	0	if defined $main::RD_TRACE
8098	0	24	if defined $main::RD_TRACE
8110	0	24	if defined $main::RD_TRACE
8123	0	24	unless $_matched
8125	0	24	unless ($_matched or defined $score)
8131	0	0	if defined $main::RD_TRACE
8138	0	24	if (not defined $return and defined $score)
8140	0	0	if defined $main::RD_TRACE
8147	24	0	unless defined $return
8148	0	24	if (defined $main::RD_TRACE)
8173	0	94	if defined $main::RD_TRACE
8192	94	0	defined $_[4] ? :
8194	94	0	$#arg & 1 ? :
8209	0	94	if defined $main::RD_TRACE
8222	0	94	if defined $main::RD_TRACE
8229	94	0	unless (defined($_tok = NIL($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
8232	0	94	if defined $main::RD_TRACE
8240	0	0	if defined $main::RD_TRACE
8252	0	0	if defined $main::RD_TRACE
8265	94	0	unless $_matched
8270	0	94	if defined $main::RD_TRACE
8283	0	94	if defined $main::RD_TRACE
8290	0	94	unless (defined($_tok = STRING($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
8293	0	0	if defined $main::RD_TRACE
8301	0	94	if defined $main::RD_TRACE
8313	0	94	if defined $main::RD_TRACE
8326	0	94	unless $_matched
8328	0	94	unless ($_matched or defined $score)
8334	0	0	if defined $main::RD_TRACE
8341	0	94	if (not defined $return and defined $score)
8343	0	0	if defined $main::RD_TRACE
8350	94	0	unless defined $return
8351	0	94	if (defined $main::RD_TRACE)
8376	0	24	if defined $main::RD_TRACE
8395	24	0	defined $_[4] ? :
8397	24	0	$#arg & 1 ? :
8412	0	24	if defined $main::RD_TRACE
8425	0	24	if defined $main::RD_TRACE
8432	1	23	unless (defined($_tok = NIL($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
8435	0	1	if defined $main::RD_TRACE
8443	0	23	if defined $main::RD_TRACE
8455	0	23	if defined $main::RD_TRACE
8468	1	23	unless $_matched
8473	0	1	if defined $main::RD_TRACE
8486	0	1	if defined $main::RD_TRACE
8493	0	1	unless (defined($_tok = STRING($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
8496	0	0	if defined $main::RD_TRACE
8504	0	1	if defined $main::RD_TRACE
8516	0	1	if defined $main::RD_TRACE
8529	0	24	unless $_matched
8531	0	24	unless ($_matched or defined $score)
8537	0	0	if defined $main::RD_TRACE
8544	0	24	if (not defined $return and defined $score)
8546	0	0	if defined $main::RD_TRACE
8553	24	0	unless defined $return
8554	0	24	if (defined $main::RD_TRACE)
8579	0	132	if defined $main::RD_TRACE
8598	132	0	defined $_[4] ? :
8600	132	0	$#arg & 1 ? :
8615	0	132	if defined $main::RD_TRACE
8628	0	132	if defined $main::RD_TRACE
8635	0	132	unless (defined($_tok = STRING($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
8638	0	0	if defined $main::RD_TRACE
8646	0	132	if defined $main::RD_TRACE
8658	0	132	if defined $main::RD_TRACE
8671	0	132	unless $_matched
8673	0	132	unless ($_matched or defined $score)
8679	0	0	if defined $main::RD_TRACE
8686	0	132	if (not defined $return and defined $score)
8688	0	0	if defined $main::RD_TRACE
8695	132	0	unless defined $return
8696	0	132	if (defined $main::RD_TRACE)
8721	0	255	if defined $main::RD_TRACE
8740	255	0	defined $_[4] ? :
8742	255	0	$#arg & 1 ? :
8757	0	255	if defined $main::RD_TRACE
8770	0	255	if defined $main::RD_TRACE
8779	9	246	if $lastsep = $1
	123	0	if ($text =~ s/\A($Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::skip)/'' if $lastsep = $1;/e and do { $_tok = ')'; 1 } and substr($text, 0, length $_tok) eq $_tok and do { substr($text, 0, length $_tok) = ''; 1 })
8787	0	123	if defined $main::RD_TRACE
8792	0	132	if defined $main::RD_TRACE
8799	0	132	if defined $main::RD_TRACE
8806	0	132	unless (defined($_tok = key($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
8809	0	0	if defined $main::RD_TRACE
8817	0	132	if defined $main::RD_TRACE
8829	0	132	if defined $main::RD_TRACE
8836	0	132	unless (defined($_tok = value($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
8839	0	0	if defined $main::RD_TRACE
8847	0	132	if defined $main::RD_TRACE
8859	0	132	if defined $main::RD_TRACE
8866	0	132	$_noactions ? :
8867	0	132	unless (defined $_tok)
8869	0	0	if defined $main::RD_TRACE
8873	0	132	if defined $main::RD_TRACE
8881	0	132	if defined $main::RD_TRACE
8894	123	132	unless $_matched
8896	123	132	unless ($_matched or defined $score)
8902	0	123	if defined $main::RD_TRACE
8909	0	132	if (not defined $return and defined $score)
8911	0	0	if defined $main::RD_TRACE
8918	0	132	unless defined $return
8919	0	132	if (defined $main::RD_TRACE)
8944	0	94	if defined $main::RD_TRACE
8963	94	0	defined $_[4] ? :
8965	94	0	$#arg & 1 ? :
8980	0	94	if defined $main::RD_TRACE
8993	0	94	if defined $main::RD_TRACE
9000	94	0	unless (defined($_tok = NIL($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
9003	0	94	if defined $main::RD_TRACE
9011	0	0	if defined $main::RD_TRACE
9023	0	0	if defined $main::RD_TRACE
9036	94	0	unless $_matched
9041	0	94	if defined $main::RD_TRACE
9054	0	94	if defined $main::RD_TRACE
9061	0	94	unless (defined($_tok = STRING($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
9064	0	0	if defined $main::RD_TRACE
9072	0	94	if defined $main::RD_TRACE
9084	0	94	if defined $main::RD_TRACE
9097	0	94	unless $_matched
9099	0	94	unless ($_matched or defined $score)
9105	0	0	if defined $main::RD_TRACE
9112	0	94	if (not defined $return and defined $score)
9114	0	0	if defined $main::RD_TRACE
9121	94	0	unless defined $return
9122	0	94	if (defined $main::RD_TRACE)
9147	0	24	if defined $main::RD_TRACE
9166	24	0	defined $_[4] ? :
9168	24	0	$#arg & 1 ? :
9183	0	24	if defined $main::RD_TRACE
9196	0	24	if defined $main::RD_TRACE
9203	24	0	unless (defined($_tok = NIL($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
9206	0	24	if defined $main::RD_TRACE
9214	0	0	if defined $main::RD_TRACE
9226	0	0	if defined $main::RD_TRACE
9239	24	0	unless $_matched
9244	0	24	if defined $main::RD_TRACE
9257	0	24	if defined $main::RD_TRACE
9264	0	24	unless (defined($_tok = STRING($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
9267	0	0	if defined $main::RD_TRACE
9275	0	24	if defined $main::RD_TRACE
9287	0	24	if defined $main::RD_TRACE
9300	0	24	unless $_matched
9302	0	24	unless ($_matched or defined $score)
9308	0	0	if defined $main::RD_TRACE
9315	0	24	if (not defined $return and defined $score)
9317	0	0	if defined $main::RD_TRACE
9324	24	0	unless defined $return
9325	0	24	if (defined $main::RD_TRACE)
9350	0	125	if defined $main::RD_TRACE
9369	125	0	defined $_[4] ? :
9371	125	0	$#arg & 1 ? :
9386	0	125	if defined $main::RD_TRACE
9399	0	125	if defined $main::RD_TRACE
9406	94	31	unless (defined($_tok = $thisparser->_parserepeat($text, \&Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::subpart, 1, 100000000, $_noactions, $expectation, sub { \@arg; } , undef)))
9408	0	94	if defined $main::RD_TRACE
9415	0	31	if defined $main::RD_TRACE
9429	0	31	if defined $main::RD_TRACE
9435	31	0	if (defined $_tok) { }
9437	0	31	if defined $main::RD_TRACE
9444	0	0	if defined $main::RD_TRACE
9449	0	31	unless defined $_tok
9453	0	31	if defined $main::RD_TRACE
9460	0	31	unless (defined($_tok = bodysubtype($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
9463	0	0	if defined $main::RD_TRACE
9471	0	31	if defined $main::RD_TRACE
9483	0	31	if defined $main::RD_TRACE
9490	0	31	unless (defined($_tok = $thisparser->_parserepeat($text, \&Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::bodyparms, 0, 1, $_noactions, $expectation, sub { \@arg; } , undef)))
9492	0	0	if defined $main::RD_TRACE
9499	0	31	if defined $main::RD_TRACE
9511	0	31	if defined $main::RD_TRACE
9518	0	31	unless (defined($_tok = $thisparser->_parserepeat($text, \&Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::bodydisp, 0, 1, $_noactions, $expectation, sub { \@arg; } , undef)))
9520	0	0	if defined $main::RD_TRACE
9527	0	31	if defined $main::RD_TRACE
9539	0	31	if defined $main::RD_TRACE
9546	0	31	unless (defined($_tok = $thisparser->_parserepeat($text, \&Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::bodylang, 0, 1, $_noactions, $expectation, sub { \@arg; } , undef)))
9548	0	0	if defined $main::RD_TRACE
9555	0	31	if defined $main::RD_TRACE
9567	0	31	if defined $main::RD_TRACE
9574	0	31	unless (defined($_tok = $thisparser->_parserepeat($text, \&Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::bodyloc, 0, 1, $_noactions, $expectation, sub { \@arg; } , undef)))
9576	0	0	if defined $main::RD_TRACE
9583	0	31	if defined $main::RD_TRACE
9595	0	31	if defined $main::RD_TRACE
9602	0	31	unless (defined($_tok = $thisparser->_parserepeat($text, \&Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::bodyextra, 0, 1, $_noactions, $expectation, sub { \@arg; } , undef)))
9604	0	0	if defined $main::RD_TRACE
9611	0	31	if defined $main::RD_TRACE
9623	0	31	if defined $main::RD_TRACE
9630	0	31	unless (defined($_tok = $thisparser->_parserepeat($text, \&Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::bodyextensions, 0, 100000000, $_noactions, $expectation, sub { \@arg; } , undef)))
9632	0	0	if defined $main::RD_TRACE
9639	0	31	if defined $main::RD_TRACE
9653	0	31	if defined $main::RD_TRACE
9659	31	0	if (defined $_tok) { }
9661	0	31	if defined $main::RD_TRACE
9668	0	0	if defined $main::RD_TRACE
9673	0	31	unless defined $_tok
9677	0	31	if defined $main::RD_TRACE
9684	0	31	$_noactions ? :
9693	0	31	unless (defined $_tok)
9695	0	0	if defined $main::RD_TRACE
9699	0	31	if defined $main::RD_TRACE
9707	0	31	if defined $main::RD_TRACE
9720	94	31	unless $_matched
9722	94	31	unless ($_matched or defined $score)
9728	0	94	if defined $main::RD_TRACE
9735	0	31	if (not defined $return and defined $score)
9737	0	0	if defined $main::RD_TRACE
9744	0	31	unless defined $return
9745	0	31	if (defined $main::RD_TRACE)
9770	0	53	if defined $main::RD_TRACE
9789	53	0	defined $_[4] ? :
9791	53	0	$#arg & 1 ? :
9806	0	53	if defined $main::RD_TRACE
9819	0	53	if defined $main::RD_TRACE
9826	32	21	unless (defined($_tok = rfc822message($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
9829	0	32	if defined $main::RD_TRACE
9837	0	21	if defined $main::RD_TRACE
9851	0	21	if defined $main::RD_TRACE
9857	21	0	if (defined $_tok) { }
9859	0	21	if defined $main::RD_TRACE
9866	0	0	if defined $main::RD_TRACE
9871	0	21	unless defined $_tok
9875	0	21	if defined $main::RD_TRACE
9882	0	21	unless (defined($_tok = bodyparms($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
9885	0	0	if defined $main::RD_TRACE
9893	0	21	if defined $main::RD_TRACE
9905	0	21	if defined $main::RD_TRACE
9912	0	21	unless (defined($_tok = bodyid($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
9915	0	0	if defined $main::RD_TRACE
9923	0	21	if defined $main::RD_TRACE
9935	0	21	if defined $main::RD_TRACE
9942	0	21	unless (defined($_tok = bodydesc($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
9945	0	0	if defined $main::RD_TRACE
9953	0	21	if defined $main::RD_TRACE
9965	0	21	if defined $main::RD_TRACE
9972	0	21	unless (defined($_tok = bodyenc($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
9975	0	0	if defined $main::RD_TRACE
9983	0	21	if defined $main::RD_TRACE
9995	0	21	if defined $main::RD_TRACE
10002	0	21	unless (defined($_tok = bodysize($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
10005	0	0	if defined $main::RD_TRACE
10013	0	21	if defined $main::RD_TRACE
10025	0	21	if defined $main::RD_TRACE
10032	0	21	unless (defined($_tok = $thisparser->_parserepeat($text, \&Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::envelopestruct, 0, 1, $_noactions, $expectation, sub { \@arg; } , undef)))
10034	0	0	if defined $main::RD_TRACE
10041	0	21	if defined $main::RD_TRACE
10053	0	21	if defined $main::RD_TRACE
10060	0	21	unless (defined($_tok = $thisparser->_parserepeat($text, \&Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::bodystructure, 0, 1, $_noactions, $expectation, sub { \@arg; } , undef)))
10062	0	0	if defined $main::RD_TRACE
10069	0	21	if defined $main::RD_TRACE
10081	0	21	if defined $main::RD_TRACE
10088	0	21	unless (defined($_tok = $thisparser->_parserepeat($text, \&Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::textlines, 0, 1, $_noactions, $expectation, sub { \@arg; } , undef)))
10090	0	0	if defined $main::RD_TRACE
10097	0	21	if defined $main::RD_TRACE
10109	0	21	if defined $main::RD_TRACE
10116	0	21	unless (defined($_tok = $thisparser->_parserepeat($text, \&Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::bodyMD5, 0, 1, $_noactions, $expectation, sub { \@arg; } , undef)))
10118	0	0	if defined $main::RD_TRACE
10125	0	21	if defined $main::RD_TRACE
10137	0	21	if defined $main::RD_TRACE
10144	0	21	unless (defined($_tok = $thisparser->_parserepeat($text, \&Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::bodydisp, 0, 1, $_noactions, $expectation, sub { \@arg; } , undef)))
10146	0	0	if defined $main::RD_TRACE
10153	0	21	if defined $main::RD_TRACE
10165	0	21	if defined $main::RD_TRACE
10172	0	21	unless (defined($_tok = $thisparser->_parserepeat($text, \&Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::bodylang, 0, 1, $_noactions, $expectation, sub { \@arg; } , undef)))
10174	0	0	if defined $main::RD_TRACE
10181	0	21	if defined $main::RD_TRACE
10193	0	21	if defined $main::RD_TRACE
10200	0	21	unless (defined($_tok = $thisparser->_parserepeat($text, \&Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::bodyextra, 0, 1, $_noactions, $expectation, sub { \@arg; } , undef)))
10202	0	0	if defined $main::RD_TRACE
10209	0	21	if defined $main::RD_TRACE
10221	0	21	if defined $main::RD_TRACE
10228	0	21	$_noactions ? :
10244	0	21	unless (defined $_tok)
10246	0	0	if defined $main::RD_TRACE
10250	0	21	if defined $main::RD_TRACE
10258	0	21	if defined $main::RD_TRACE
10271	32	21	unless $_matched
10273	32	21	unless ($_matched or defined $score)
10279	0	32	if defined $main::RD_TRACE
10286	0	21	if (not defined $return and defined $score)
10288	0	0	if defined $main::RD_TRACE
10295	0	21	unless defined $return
10296	0	21	if (defined $main::RD_TRACE)
10321	0	32	if defined $main::RD_TRACE
10340	32	0	defined $_[4] ? :
10342	32	0	$#arg & 1 ? :
10357	0	32	if defined $main::RD_TRACE
10370	0	32	if defined $main::RD_TRACE
10377	20	12	unless (defined($_tok = bodytype($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
10380	0	20	if defined $main::RD_TRACE
10388	0	12	if defined $main::RD_TRACE
10400	0	12	if defined $main::RD_TRACE
10407	0	12	unless (defined($_tok = basicfields($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
10410	0	0	if defined $main::RD_TRACE
10418	0	12	if defined $main::RD_TRACE
10430	0	12	if defined $main::RD_TRACE
10437	0	12	unless (defined($_tok = $thisparser->_parserepeat($text, \&Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::bodyMD5, 0, 1, $_noactions, $expectation, sub { \@arg; } , undef)))
10439	0	0	if defined $main::RD_TRACE
10446	0	12	if defined $main::RD_TRACE
10458	0	12	if defined $main::RD_TRACE
10465	0	12	unless (defined($_tok = $thisparser->_parserepeat($text, \&Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::bodydisp, 0, 1, $_noactions, $expectation, sub { \@arg; } , undef)))
10467	0	0	if defined $main::RD_TRACE
10474	0	12	if defined $main::RD_TRACE
10486	0	12	if defined $main::RD_TRACE
10493	0	12	unless (defined($_tok = $thisparser->_parserepeat($text, \&Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::bodylang, 0, 1, $_noactions, $expectation, sub { \@arg; } , undef)))
10495	0	0	if defined $main::RD_TRACE
10502	0	12	if defined $main::RD_TRACE
10514	0	12	if defined $main::RD_TRACE
10521	0	12	unless (defined($_tok = $thisparser->_parserepeat($text, \&Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::bodyextra, 0, 1, $_noactions, $expectation, sub { \@arg; } , undef)))
10523	0	0	if defined $main::RD_TRACE
10530	0	12	if defined $main::RD_TRACE
10542	0	12	if defined $main::RD_TRACE
10549	0	12	$_noactions ? :
10555	0	12	unless (defined $_tok)
10557	0	0	if defined $main::RD_TRACE
10561	0	12	if defined $main::RD_TRACE
10569	0	12	if defined $main::RD_TRACE
10582	20	12	unless $_matched
10584	20	12	unless ($_matched or defined $score)
10590	0	20	if defined $main::RD_TRACE
10597	0	12	if (not defined $return and defined $score)
10599	0	0	if defined $main::RD_TRACE
10606	0	12	unless defined $return
10607	0	12	if (defined $main::RD_TRACE)
10632	0	125	if defined $main::RD_TRACE
10651	125	0	defined $_[4] ? :
10653	125	0	$#arg & 1 ? :
10668	0	125	if defined $main::RD_TRACE
10681	0	125	if defined $main::RD_TRACE
10688	94	31	unless (defined($_tok = multipart($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
10691	0	94	if defined $main::RD_TRACE
10699	0	31	if defined $main::RD_TRACE
10711	0	31	if defined $main::RD_TRACE
10718	0	31	$_noactions ? :
10719	0	31	unless (defined $_tok)
10721	0	0	if defined $main::RD_TRACE
10725	0	31	if defined $main::RD_TRACE
10733	0	31	if defined $main::RD_TRACE
10746	94	31	unless $_matched
10751	0	94	if defined $main::RD_TRACE
10764	0	94	if defined $main::RD_TRACE
10771	53	41	unless (defined($_tok = textmessage($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
10774	0	53	if defined $main::RD_TRACE
10782	0	41	if defined $main::RD_TRACE
10794	0	41	if defined $main::RD_TRACE
10801	0	41	$_noactions ? :
10802	0	41	unless (defined $_tok)
10804	0	0	if defined $main::RD_TRACE
10808	0	41	if defined $main::RD_TRACE
10816	0	41	if defined $main::RD_TRACE
10829	53	72	unless $_matched
10834	0	53	if defined $main::RD_TRACE
10847	0	53	if defined $main::RD_TRACE
10854	32	21	unless (defined($_tok = nestedmessage($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
10857	0	32	if defined $main::RD_TRACE
10865	0	21	if defined $main::RD_TRACE
10877	0	21	if defined $main::RD_TRACE
10884	0	21	$_noactions ? :
10885	0	21	unless (defined $_tok)
10887	0	0	if defined $main::RD_TRACE
10891	0	21	if defined $main::RD_TRACE
10899	0	21	if defined $main::RD_TRACE
10912	32	93	unless $_matched
10917	0	32	if defined $main::RD_TRACE
10930	0	32	if defined $main::RD_TRACE
10937	20	12	unless (defined($_tok = othertypemessage($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
10940	0	20	if defined $main::RD_TRACE
10948	0	12	if defined $main::RD_TRACE
10960	0	12	if defined $main::RD_TRACE
10967	0	12	$_noactions ? :
10968	0	12	unless (defined $_tok)
10970	0	0	if defined $main::RD_TRACE
10974	0	12	if defined $main::RD_TRACE
10982	0	12	if defined $main::RD_TRACE
10995	20	105	unless $_matched
10997	20	105	unless ($_matched or defined $score)
11003	0	20	if defined $main::RD_TRACE
11010	0	105	if (not defined $return and defined $score)
11012	0	0	if defined $main::RD_TRACE
11019	0	105	unless defined $return
11020	0	105	if (defined $main::RD_TRACE)
11045	0	94	if defined $main::RD_TRACE
11064	94	0	defined $_[4] ? :
11066	94	0	$#arg & 1 ? :
11081	0	94	if defined $main::RD_TRACE
11094	0	94	if defined $main::RD_TRACE
11101	70	24	unless (defined($_tok = NIL($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
11104	0	70	if defined $main::RD_TRACE
11112	0	24	if defined $main::RD_TRACE
11124	0	24	if defined $main::RD_TRACE
11137	70	24	unless $_matched
11142	0	70	if defined $main::RD_TRACE
11155	0	70	if defined $main::RD_TRACE
11162	0	70	unless (defined($_tok = STRING($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
11165	0	0	if defined $main::RD_TRACE
11173	0	70	if defined $main::RD_TRACE
11185	0	70	if defined $main::RD_TRACE
11198	0	94	unless $_matched
11200	0	94	unless ($_matched or defined $score)
11206	0	0	if defined $main::RD_TRACE
11213	0	94	if (not defined $return and defined $score)
11215	0	0	if defined $main::RD_TRACE
11222	94	0	unless defined $return
11223	0	94	if (defined $main::RD_TRACE)
11248	0	24	if defined $main::RD_TRACE
11267	24	0	defined $_[4] ? :
11269	24	0	$#arg & 1 ? :
11284	0	24	if defined $main::RD_TRACE
11297	0	24	if defined $main::RD_TRACE
11304	0	24	unless (defined($_tok = ADDRESSES($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
11307	0	0	if defined $main::RD_TRACE
11315	0	24	if defined $main::RD_TRACE
11327	0	24	if defined $main::RD_TRACE
11340	0	24	unless $_matched
11342	0	24	unless ($_matched or defined $score)
11348	0	0	if defined $main::RD_TRACE
11355	0	24	if (not defined $return and defined $score)
11357	0	0	if defined $main::RD_TRACE
11364	24	0	unless defined $return
11365	0	24	if (defined $main::RD_TRACE)
11390	0	53	if defined $main::RD_TRACE
11409	53	0	defined $_[4] ? :
11411	53	0	$#arg & 1 ? :
11426	0	53	if defined $main::RD_TRACE
11439	0	53	if defined $main::RD_TRACE
11446	31	22	unless (defined($_tok = MESSAGE($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
11449	0	31	if defined $main::RD_TRACE
11457	0	22	if defined $main::RD_TRACE
11469	0	22	if defined $main::RD_TRACE
11476	1	21	unless (defined($_tok = RFC822($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
11479	0	1	if defined $main::RD_TRACE
11487	0	21	if defined $main::RD_TRACE
11499	0	21	if defined $main::RD_TRACE
11506	0	21	$_noactions ? :
11507	0	21	unless (defined $_tok)
11509	0	0	if defined $main::RD_TRACE
11513	0	21	if defined $main::RD_TRACE
11521	0	21	if defined $main::RD_TRACE
11534	32	21	unless $_matched
11536	32	21	unless ($_matched or defined $score)
11542	0	32	if defined $main::RD_TRACE
11549	0	21	if (not defined $return and defined $score)
11551	0	0	if defined $main::RD_TRACE
11558	0	21	unless defined $return
11559	0	21	if (defined $main::RD_TRACE)
11584	0	24	if defined $main::RD_TRACE
11603	24	0	defined $_[4] ? :
11605	24	0	$#arg & 1 ? :
11620	0	24	if defined $main::RD_TRACE
11633	0	24	if defined $main::RD_TRACE
11640	0	24	unless (defined($_tok = ADDRESSES($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
11643	0	0	if defined $main::RD_TRACE
11651	0	24	if defined $main::RD_TRACE
11663	0	24	if defined $main::RD_TRACE
11676	0	24	unless $_matched
11678	0	24	unless ($_matched or defined $score)
11684	0	0	if defined $main::RD_TRACE
11691	0	24	if (not defined $return and defined $score)
11693	0	0	if defined $main::RD_TRACE
11700	24	0	unless defined $return
11701	0	24	if (defined $main::RD_TRACE)
11726	0	94	if defined $main::RD_TRACE
11745	94	0	defined $_[4] ? :
11747	94	0	$#arg & 1 ? :
11762	0	94	if defined $main::RD_TRACE
11775	0	94	if defined $main::RD_TRACE
11782	0	94	unless (defined($_tok = NIL($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
11785	0	0	if defined $main::RD_TRACE
11793	0	94	if defined $main::RD_TRACE
11805	0	94	if defined $main::RD_TRACE
11818	0	94	unless $_matched
11823	0	0	if defined $main::RD_TRACE
11836	0	0	if defined $main::RD_TRACE
11843	0	0	unless (defined($_tok = STRING($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
11846	0	0	if defined $main::RD_TRACE
11854	0	0	if defined $main::RD_TRACE
11866	0	0	if defined $main::RD_TRACE
11879	0	94	unless $_matched
11881	0	94	unless ($_matched or defined $score)
11887	0	0	if defined $main::RD_TRACE
11894	0	94	if (not defined $return and defined $score)
11896	0	0	if defined $main::RD_TRACE
11903	94	0	unless defined $return
11904	0	94	if (defined $main::RD_TRACE)
11929	0	10	if defined $main::RD_TRACE
11948	10	0	defined $_[4] ? :
11950	10	0	$#arg & 1 ? :
11965	0	10	if defined $main::RD_TRACE
11978	0	10	if defined $main::RD_TRACE
11986	0	10	if $lastsep = $1
	0	10	unless ($text =~ s/\A($Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::skip)/'' if $lastsep = $1;/e and $text =~ /\A(?:.*?\(.*?BODYSTRUCTURE \()/i)
11988	0	0	if defined $lastsep
11990	0	0	if defined $main::RD_TRACE
11998	0	10	if defined $main::RD_TRACE
12005	0	10	if defined $main::RD_TRACE
12012	0	10	unless (defined($_tok = $thisparser->_parserepeat($text, \&Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::part, 1, 1, $_noactions, $expectation, sub { \@arg; } , undef)))
12014	0	0	if defined $main::RD_TRACE
12021	0	10	if defined $main::RD_TRACE
12033	0	10	if defined $main::RD_TRACE
12041	0	10	if $lastsep = $1
	0	10	unless ($text =~ s/\A($Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::skip)/'' if $lastsep = $1;/e and $text =~ /\A(?:\).*\)\r?\n?)/)
12043	0	0	if defined $lastsep
12045	0	0	if defined $main::RD_TRACE
12053	0	10	if defined $main::RD_TRACE
12060	0	10	if defined $main::RD_TRACE
12067	0	10	$_noactions ? :
12068	0	10	unless (defined $_tok)
12070	0	0	if defined $main::RD_TRACE
12074	0	10	if defined $main::RD_TRACE
12082	0	10	if defined $main::RD_TRACE
12095	0	10	unless $_matched
12097	0	10	unless ($_matched or defined $score)
12103	0	0	if defined $main::RD_TRACE
12110	0	10	if (not defined $return and defined $score)
12112	0	0	if defined $main::RD_TRACE
12119	0	10	unless defined $return
12120	0	10	if (defined $main::RD_TRACE)
12145	0	24	if defined $main::RD_TRACE
12164	24	0	defined $_[4] ? :
12166	24	0	$#arg & 1 ? :
12181	0	24	if defined $main::RD_TRACE
12194	0	24	if defined $main::RD_TRACE
12201	24	0	unless (defined($_tok = NIL($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
12204	0	24	if defined $main::RD_TRACE
12212	0	0	if defined $main::RD_TRACE
12224	0	0	if defined $main::RD_TRACE
12237	24	0	unless $_matched
12242	0	24	if defined $main::RD_TRACE
12255	0	24	if defined $main::RD_TRACE
12262	0	24	unless (defined($_tok = STRING($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
12265	0	0	if defined $main::RD_TRACE
12273	0	24	if defined $main::RD_TRACE
12285	0	24	if defined $main::RD_TRACE
12298	0	24	unless $_matched
12300	0	24	unless ($_matched or defined $score)
12306	0	0	if defined $main::RD_TRACE
12313	0	24	if (not defined $return and defined $score)
12315	0	0	if defined $main::RD_TRACE
12322	24	0	unless defined $return
12323	0	24	if (defined $main::RD_TRACE)
12348	0	200	if defined $main::RD_TRACE
12367	200	0	defined $_[4] ? :
12369	200	0	$#arg & 1 ? :
12384	0	200	if defined $main::RD_TRACE
12397	0	200	if defined $main::RD_TRACE
12406	32	168	if $lastsep = $1
	125	75	unless ($text =~ s/\A($Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::skip)/'' if $lastsep = $1;/e and do { $_tok = '('; 1 } and substr($text, 0, length $_tok) eq $_tok and do { substr($text, 0, length $_tok) = ''; 1 })
12411	125	0	if defined $lastsep
12414	0	125	if defined $main::RD_TRACE
12419	0	75	if defined $main::RD_TRACE
12426	0	75	if defined $main::RD_TRACE
12433	0	75	unless (defined($_tok = part($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
12436	0	0	if defined $main::RD_TRACE
12444	0	75	if defined $main::RD_TRACE
12456	0	75	if defined $main::RD_TRACE
12465	0	75	if $lastsep = $1
	0	75	unless ($text =~ s/\A($Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::skip)/'' if $lastsep = $1;/e and do { $_tok = ')'; 1 } and substr($text, 0, length $_tok) eq $_tok and do { substr($text, 0, length $_tok) = ''; 1 })
12470	0	0	if defined $lastsep
12473	0	0	if defined $main::RD_TRACE
12478	0	75	if defined $main::RD_TRACE
12485	0	75	if defined $main::RD_TRACE
12492	0	75	$_noactions ? :
12493	0	75	unless (defined $_tok)
12495	0	0	if defined $main::RD_TRACE
12499	0	75	if defined $main::RD_TRACE
12509	0	75	if defined $main::RD_TRACE
12515	75	0	if (defined $_tok) { }
12517	0	75	if defined $main::RD_TRACE
12524	0	0	if defined $main::RD_TRACE
12529	0	75	unless defined $_tok
12533	0	75	if defined $main::RD_TRACE
12546	125	75	unless $_matched
12548	125	75	unless ($_matched or defined $score)
12554	0	125	if defined $main::RD_TRACE
12561	0	75	if (not defined $return and defined $score)
12563	0	0	if defined $main::RD_TRACE
12570	0	75	unless defined $return
12571	0	75	if (defined $main::RD_TRACE)
12596	0	62	if defined $main::RD_TRACE
12615	62	0	defined $_[4] ? :
12617	62	0	$#arg & 1 ? :
12632	0	62	if defined $main::RD_TRACE
12645	0	62	if defined $main::RD_TRACE
12652	62	0	unless (defined($_tok = NIL($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
12655	0	62	if defined $main::RD_TRACE
12663	0	0	if defined $main::RD_TRACE
12675	0	0	if defined $main::RD_TRACE
12688	62	0	unless $_matched
12693	0	62	if defined $main::RD_TRACE
12706	0	62	if defined $main::RD_TRACE
12713	2	60	unless (defined($_tok = NUMBER($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
12716	0	2	if defined $main::RD_TRACE
12724	0	60	if defined $main::RD_TRACE
12736	0	60	if defined $main::RD_TRACE
12749	2	60	unless $_matched
12751	2	60	unless ($_matched or defined $score)
12757	0	2	if defined $main::RD_TRACE
12764	0	60	if (not defined $return and defined $score)
12766	0	0	if defined $main::RD_TRACE
12773	60	0	unless defined $return
12774	0	60	if (defined $main::RD_TRACE)
12799	0	94	if defined $main::RD_TRACE
12818	94	0	defined $_[4] ? :
12820	94	0	$#arg & 1 ? :
12835	0	94	if defined $main::RD_TRACE
12848	0	94	if defined $main::RD_TRACE
12855	53	41	unless (defined($_tok = TEXT($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
12858	0	53	if defined $main::RD_TRACE
12866	0	41	if defined $main::RD_TRACE
12880	0	41	if defined $main::RD_TRACE
12886	41	0	if (defined $_tok) { }
12888	0	41	if defined $main::RD_TRACE
12895	0	0	if defined $main::RD_TRACE
12900	0	41	unless defined $_tok
12904	0	41	if defined $main::RD_TRACE
12911	0	41	unless (defined($_tok = basicfields($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
12914	0	0	if defined $main::RD_TRACE
12922	0	41	if defined $main::RD_TRACE
12934	0	41	if defined $main::RD_TRACE
12941	0	41	unless (defined($_tok = $thisparser->_parserepeat($text, \&Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::textlines, 0, 1, $_noactions, $expectation, sub { \@arg; } , undef)))
12943	0	0	if defined $main::RD_TRACE
12950	0	41	if defined $main::RD_TRACE
12962	0	41	if defined $main::RD_TRACE
12969	0	41	unless (defined($_tok = $thisparser->_parserepeat($text, \&Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::bodyMD5, 0, 1, $_noactions, $expectation, sub { \@arg; } , undef)))
12971	0	0	if defined $main::RD_TRACE
12978	0	41	if defined $main::RD_TRACE
12990	0	41	if defined $main::RD_TRACE
12997	0	41	unless (defined($_tok = $thisparser->_parserepeat($text, \&Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::bodydisp, 0, 1, $_noactions, $expectation, sub { \@arg; } , undef)))
12999	0	0	if defined $main::RD_TRACE
13006	0	41	if defined $main::RD_TRACE
13018	0	41	if defined $main::RD_TRACE
13025	0	41	unless (defined($_tok = $thisparser->_parserepeat($text, \&Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::bodylang, 0, 1, $_noactions, $expectation, sub { \@arg; } , undef)))
13027	0	0	if defined $main::RD_TRACE
13034	0	41	if defined $main::RD_TRACE
13046	0	41	if defined $main::RD_TRACE
13053	0	41	unless (defined($_tok = $thisparser->_parserepeat($text, \&Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::bodyextra, 0, 1, $_noactions, $expectation, sub { \@arg; } , undef)))
13055	0	0	if defined $main::RD_TRACE
13062	0	41	if defined $main::RD_TRACE
13074	0	41	if defined $main::RD_TRACE
13081	0	41	unless (defined($_tok = $thisparser->_parserepeat($text, \&Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::bodyextensions, 0, 100000000, $_noactions, $expectation, sub { \@arg; } , undef)))
13083	0	0	if defined $main::RD_TRACE
13090	0	41	if defined $main::RD_TRACE
13102	0	41	if defined $main::RD_TRACE
13109	0	41	$_noactions ? :
13116	0	41	unless (defined $_tok)
13118	0	0	if defined $main::RD_TRACE
13122	0	41	if defined $main::RD_TRACE
13130	0	41	if defined $main::RD_TRACE
13143	53	41	unless $_matched
13145	53	41	unless ($_matched or defined $score)
13151	0	53	if defined $main::RD_TRACE
13158	0	41	if (not defined $return and defined $score)
13160	0	0	if defined $main::RD_TRACE
13167	0	41	unless defined $return
13168	0	41	if (defined $main::RD_TRACE)
13193	0	24	if defined $main::RD_TRACE
13212	24	0	defined $_[4] ? :
13214	24	0	$#arg & 1 ? :
13229	0	24	if defined $main::RD_TRACE
13242	0	24	if defined $main::RD_TRACE
13249	0	24	unless (defined($_tok = ADDRESSES($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
13252	0	0	if defined $main::RD_TRACE
13260	0	24	if defined $main::RD_TRACE
13272	0	24	if defined $main::RD_TRACE
13285	0	24	unless $_matched
13287	0	24	unless ($_matched or defined $score)
13293	0	0	if defined $main::RD_TRACE
13300	0	24	if (not defined $return and defined $score)
13302	0	0	if defined $main::RD_TRACE
13309	24	0	unless defined $return
13310	0	24	if (defined $main::RD_TRACE)
13335	0	132	if defined $main::RD_TRACE
13354	132	0	defined $_[4] ? :
13356	132	0	$#arg & 1 ? :
13371	0	132	if defined $main::RD_TRACE
13384	0	132	if defined $main::RD_TRACE
13391	120	12	unless (defined($_tok = NIL($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
13394	0	120	if defined $main::RD_TRACE
13402	0	12	if defined $main::RD_TRACE
13414	0	12	if defined $main::RD_TRACE
13427	120	12	unless $_matched
13432	0	120	if defined $main::RD_TRACE
13445	0	120	if defined $main::RD_TRACE
13452	120	0	unless (defined($_tok = NUMBER($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
13455	0	120	if defined $main::RD_TRACE
13463	0	0	if defined $main::RD_TRACE
13475	0	0	if defined $main::RD_TRACE
13488	120	12	unless $_matched
13493	0	120	if defined $main::RD_TRACE
13506	0	120	if defined $main::RD_TRACE
13513	16	104	unless (defined($_tok = STRING($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
13516	0	16	if defined $main::RD_TRACE
13524	0	104	if defined $main::RD_TRACE
13536	0	104	if defined $main::RD_TRACE
13549	16	116	unless $_matched
13554	0	16	if defined $main::RD_TRACE
13567	0	16	if defined $main::RD_TRACE
13574	0	16	unless (defined($_tok = KVPAIRS($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
13577	0	0	if defined $main::RD_TRACE
13585	0	16	if defined $main::RD_TRACE
13597	0	16	if defined $main::RD_TRACE
13610	0	132	unless $_matched
13612	0	132	unless ($_matched or defined $score)
13618	0	0	if defined $main::RD_TRACE
13625	0	132	if (not defined $return and defined $score)
13627	0	0	if defined $main::RD_TRACE
13634	132	0	unless defined $return
13635	0	132	if (defined $main::RD_TRACE)