Branch Coverage

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

Criterion	Covered	Total	%
branch	1589	3454	46.0

line	true	false	branch
20	0	795	unless exists $items->{$opt}
22	795	0	UNIVERSAL::isa($items->{$opt}, 'ARRAY') ? :
28	42	12	unless my $from = shift()
56	0	25	if defined $main::RD_TRACE
75	25	0	defined $_[4] ? :
77	25	0	$#arg & 1 ? :
92	0	25	if defined $main::RD_TRACE
105	0	25	if defined $main::RD_TRACE
114	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 })
119	1	0	if defined $lastsep
122	0	1	if defined $main::RD_TRACE
127	0	24	if defined $main::RD_TRACE
134	0	24	if defined $main::RD_TRACE
141	0	24	unless (defined($_tok = date($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
144	0	0	if defined $main::RD_TRACE
152	0	24	if defined $main::RD_TRACE
164	0	24	if defined $main::RD_TRACE
171	0	24	unless (defined($_tok = subject($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
174	0	0	if defined $main::RD_TRACE
182	0	24	if defined $main::RD_TRACE
194	0	24	if defined $main::RD_TRACE
201	0	24	unless (defined($_tok = from($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
204	0	0	if defined $main::RD_TRACE
212	0	24	if defined $main::RD_TRACE
224	0	24	if defined $main::RD_TRACE
231	0	24	unless (defined($_tok = sender($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
234	0	0	if defined $main::RD_TRACE
242	0	24	if defined $main::RD_TRACE
254	0	24	if defined $main::RD_TRACE
261	0	24	unless (defined($_tok = replyto($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
264	0	0	if defined $main::RD_TRACE
272	0	24	if defined $main::RD_TRACE
284	0	24	if defined $main::RD_TRACE
291	0	24	unless (defined($_tok = to($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
294	0	0	if defined $main::RD_TRACE
302	0	24	if defined $main::RD_TRACE
314	0	24	if defined $main::RD_TRACE
321	0	24	unless (defined($_tok = cc($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
324	0	0	if defined $main::RD_TRACE
332	0	24	if defined $main::RD_TRACE
344	0	24	if defined $main::RD_TRACE
351	0	24	unless (defined($_tok = bcc($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
354	0	0	if defined $main::RD_TRACE
362	0	24	if defined $main::RD_TRACE
374	0	24	if defined $main::RD_TRACE
381	0	24	unless (defined($_tok = inreplyto($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
384	0	0	if defined $main::RD_TRACE
392	0	24	if defined $main::RD_TRACE
404	0	24	if defined $main::RD_TRACE
411	0	24	unless (defined($_tok = messageid($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
414	0	0	if defined $main::RD_TRACE
422	0	24	if defined $main::RD_TRACE
434	0	24	if defined $main::RD_TRACE
443	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 })
448	0	0	if defined $lastsep
451	0	0	if defined $main::RD_TRACE
456	0	24	if defined $main::RD_TRACE
463	0	24	if defined $main::RD_TRACE
470	0	24	$_noactions ? :
476	0	24	unless (defined $_tok)
478	0	0	if defined $main::RD_TRACE
482	0	24	if defined $main::RD_TRACE
490	0	24	if defined $main::RD_TRACE
503	1	24	unless $_matched
505	1	24	unless ($_matched or defined $score)
511	0	1	if defined $main::RD_TRACE
518	0	24	if (not defined $return and defined $score)
520	0	0	if defined $main::RD_TRACE
527	0	24	unless defined $return
528	0	24	if (defined $main::RD_TRACE)
553	0	195	if defined $main::RD_TRACE
572	195	0	defined $_[4] ? :
574	195	0	$#arg & 1 ? :
589	0	195	if defined $main::RD_TRACE
602	0	195	if defined $main::RD_TRACE
611	30	165	if $lastsep = $1
	122	73	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 })
616	122	0	if defined $lastsep
619	0	122	if defined $main::RD_TRACE
624	0	73	if defined $main::RD_TRACE
631	0	73	if defined $main::RD_TRACE
638	0	73	unless (defined($_tok = part($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
641	0	0	if defined $main::RD_TRACE
649	0	73	if defined $main::RD_TRACE
661	0	73	if defined $main::RD_TRACE
670	0	73	if $lastsep = $1
	0	73	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 })
675	0	0	if defined $lastsep
678	0	0	if defined $main::RD_TRACE
683	0	73	if defined $main::RD_TRACE
690	0	73	if defined $main::RD_TRACE
697	0	73	$_noactions ? :
698	0	73	unless (defined $_tok)
700	0	0	if defined $main::RD_TRACE
704	0	73	if defined $main::RD_TRACE
714	0	73	if defined $main::RD_TRACE
720	73	0	if (defined $_tok) { }
722	0	73	if defined $main::RD_TRACE
729	0	0	if defined $main::RD_TRACE
734	0	73	unless defined $_tok
738	0	73	if defined $main::RD_TRACE
751	122	73	unless $_matched
753	122	73	unless ($_matched or defined $score)
759	0	122	if defined $main::RD_TRACE
766	0	73	if (not defined $return and defined $score)
768	0	0	if defined $main::RD_TRACE
775	0	73	unless defined $return
776	0	73	if (defined $main::RD_TRACE)
801	0	1646	if defined $main::RD_TRACE
820	1646	0	defined $_[4] ? :
822	1646	0	$#arg & 1 ? :
837	0	1646	if defined $main::RD_TRACE
850	0	1646	if defined $main::RD_TRACE
858	1439	207	if $lastsep = $1
	1008	638	unless ($text =~ s/\A($Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::skip)/'' if $lastsep = $1;/e and $text =~ /\A(?:^NIL)/i)
860	1008	0	if defined $lastsep
862	0	1008	if defined $main::RD_TRACE
870	0	638	if defined $main::RD_TRACE
877	0	638	if defined $main::RD_TRACE
884	0	638	$_noactions ? :
885	0	638	unless (defined $_tok)
887	0	0	if defined $main::RD_TRACE
891	0	638	if defined $main::RD_TRACE
899	0	638	if defined $main::RD_TRACE
912	1008	638	unless $_matched
914	1008	638	unless ($_matched or defined $score)
920	0	1008	if defined $main::RD_TRACE
927	0	638	if (not defined $return and defined $score)
929	0	0	if defined $main::RD_TRACE
936	0	638	unless defined $return
937	0	638	if (defined $main::RD_TRACE)
962	0	81	if defined $main::RD_TRACE
981	81	0	defined $_[4] ? :
983	81	0	$#arg & 1 ? :
998	0	81	if defined $main::RD_TRACE
1011	0	81	if defined $main::RD_TRACE
1019	81	0	if $lastsep = $1
	51	30	unless ($text =~ s/\A($Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::skip)/'' if $lastsep = $1;/e and $text =~ /\A(?:^"PLAIN"|^PLAIN)/i)
1021	51	0	if defined $lastsep
1023	0	51	if defined $main::RD_TRACE
1031	0	30	if defined $main::RD_TRACE
1038	0	30	if defined $main::RD_TRACE
1045	0	30	$_noactions ? :
1046	0	30	unless (defined $_tok)
1048	0	0	if defined $main::RD_TRACE
1052	0	30	if defined $main::RD_TRACE
1060	0	30	if defined $main::RD_TRACE
1073	51	30	unless $_matched
1075	51	30	unless ($_matched or defined $score)
1081	0	51	if defined $main::RD_TRACE
1088	0	30	if (not defined $return and defined $score)
1090	0	0	if defined $main::RD_TRACE
1097	0	30	unless defined $return
1098	0	30	if (defined $main::RD_TRACE)
1123	0	22	if defined $main::RD_TRACE
1142	22	0	defined $_[4] ? :
1144	22	0	$#arg & 1 ? :
1159	0	22	if defined $main::RD_TRACE
1172	0	22	if defined $main::RD_TRACE
1180	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)
1182	1	0	if defined $lastsep
1184	0	1	if defined $main::RD_TRACE
1192	0	21	if defined $main::RD_TRACE
1199	0	21	if defined $main::RD_TRACE
1206	0	21	$_noactions ? :
1207	0	21	unless (defined $_tok)
1209	0	0	if defined $main::RD_TRACE
1213	0	21	if defined $main::RD_TRACE
1221	0	21	if defined $main::RD_TRACE
1234	1	21	unless $_matched
1236	1	21	unless ($_matched or defined $score)
1242	0	1	if defined $main::RD_TRACE
1249	0	21	if (not defined $return and defined $score)
1251	0	0	if defined $main::RD_TRACE
1258	0	21	unless defined $return
1259	0	21	if (defined $main::RD_TRACE)
1284	0	81	if defined $main::RD_TRACE
1303	81	0	defined $_[4] ? :
1305	81	0	$#arg & 1 ? :
1320	0	81	if defined $main::RD_TRACE
1333	0	81	if defined $main::RD_TRACE
1340	51	30	unless (defined($_tok = PLAIN($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
1343	0	51	if defined $main::RD_TRACE
1351	0	30	if defined $main::RD_TRACE
1363	0	30	if defined $main::RD_TRACE
1376	51	30	unless $_matched
1381	0	51	if defined $main::RD_TRACE
1394	0	51	if defined $main::RD_TRACE
1401	43	8	unless (defined($_tok = HTML($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
1404	0	43	if defined $main::RD_TRACE
1412	0	8	if defined $main::RD_TRACE
1424	0	8	if defined $main::RD_TRACE
1437	43	38	unless $_matched
1442	0	43	if defined $main::RD_TRACE
1455	0	43	if defined $main::RD_TRACE
1462	43	0	unless (defined($_tok = NIL($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
1465	0	43	if defined $main::RD_TRACE
1473	0	0	if defined $main::RD_TRACE
1485	0	0	if defined $main::RD_TRACE
1498	43	38	unless $_matched
1503	0	43	if defined $main::RD_TRACE
1516	0	43	if defined $main::RD_TRACE
1523	0	43	unless (defined($_tok = STRING($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
1526	0	0	if defined $main::RD_TRACE
1534	0	43	if defined $main::RD_TRACE
1546	0	43	if defined $main::RD_TRACE
1559	0	81	unless $_matched
1561	0	81	unless ($_matched or defined $score)
1567	0	0	if defined $main::RD_TRACE
1574	0	81	if (not defined $return and defined $score)
1576	0	0	if defined $main::RD_TRACE
1583	81	0	unless defined $return
1584	0	81	if (defined $main::RD_TRACE)
1609	0	24	if defined $main::RD_TRACE
1628	24	0	defined $_[4] ? :
1630	24	0	$#arg & 1 ? :
1645	0	24	if defined $main::RD_TRACE
1658	0	24	if defined $main::RD_TRACE
1665	0	24	unless (defined($_tok = ADDRESSES($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
1668	0	0	if defined $main::RD_TRACE
1676	0	24	if defined $main::RD_TRACE
1688	0	24	if defined $main::RD_TRACE
1701	0	24	unless $_matched
1703	0	24	unless ($_matched or defined $score)
1709	0	0	if defined $main::RD_TRACE
1716	0	24	if (not defined $return and defined $score)
1718	0	0	if defined $main::RD_TRACE
1725	24	0	unless defined $return
1726	0	24	if (defined $main::RD_TRACE)
1751	0	122	if defined $main::RD_TRACE
1770	122	0	defined $_[4] ? :
1772	122	0	$#arg & 1 ? :
1787	0	122	if defined $main::RD_TRACE
1800	0	122	if defined $main::RD_TRACE
1807	92	30	unless (defined($_tok = $thisparser->_parserepeat($text, \&Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::subpart, 1, 100000000, $_noactions, $expectation, sub { \@arg; } , undef)))
1809	0	92	if defined $main::RD_TRACE
1816	0	30	if defined $main::RD_TRACE
1830	0	30	if defined $main::RD_TRACE
1836	30	0	if (defined $_tok) { }
1838	0	30	if defined $main::RD_TRACE
1845	0	0	if defined $main::RD_TRACE
1850	0	30	unless defined $_tok
1854	0	30	if defined $main::RD_TRACE
1861	0	30	unless (defined($_tok = bodysubtype($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
1864	0	0	if defined $main::RD_TRACE
1872	0	30	if defined $main::RD_TRACE
1884	0	30	if defined $main::RD_TRACE
1891	0	30	unless (defined($_tok = $thisparser->_parserepeat($text, \&Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::bodyparms, 0, 1, $_noactions, $expectation, sub { \@arg; } , undef)))
1893	0	0	if defined $main::RD_TRACE
1900	0	30	if defined $main::RD_TRACE
1912	0	30	if defined $main::RD_TRACE
1919	0	30	unless (defined($_tok = $thisparser->_parserepeat($text, \&Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::bodydisp, 0, 1, $_noactions, $expectation, sub { \@arg; } , undef)))
1921	0	0	if defined $main::RD_TRACE
1928	0	30	if defined $main::RD_TRACE
1940	0	30	if defined $main::RD_TRACE
1947	0	30	unless (defined($_tok = $thisparser->_parserepeat($text, \&Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::bodylang, 0, 1, $_noactions, $expectation, sub { \@arg; } , undef)))
1949	0	0	if defined $main::RD_TRACE
1956	0	30	if defined $main::RD_TRACE
1968	0	30	if defined $main::RD_TRACE
1975	0	30	unless (defined($_tok = $thisparser->_parserepeat($text, \&Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::bodyloc, 0, 1, $_noactions, $expectation, sub { \@arg; } , undef)))
1977	0	0	if defined $main::RD_TRACE
1984	0	30	if defined $main::RD_TRACE
1996	0	30	if defined $main::RD_TRACE
2003	0	30	unless (defined($_tok = $thisparser->_parserepeat($text, \&Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::bodyextra, 0, 1, $_noactions, $expectation, sub { \@arg; } , undef)))
2005	0	0	if defined $main::RD_TRACE
2012	0	30	if defined $main::RD_TRACE
2026	0	30	if defined $main::RD_TRACE
2032	30	0	if (defined $_tok) { }
2034	0	30	if defined $main::RD_TRACE
2041	0	0	if defined $main::RD_TRACE
2046	0	30	unless defined $_tok
2050	0	30	if defined $main::RD_TRACE
2057	0	30	$_noactions ? :
2066	0	30	unless (defined $_tok)
2068	0	0	if defined $main::RD_TRACE
2072	0	30	if defined $main::RD_TRACE
2080	0	30	if defined $main::RD_TRACE
2093	92	30	unless $_matched
2095	92	30	unless ($_matched or defined $score)
2101	0	92	if defined $main::RD_TRACE
2108	0	30	if (not defined $return and defined $score)
2110	0	0	if defined $main::RD_TRACE
2117	0	30	unless defined $return
2118	0	30	if (defined $main::RD_TRACE)
2143	0	72	if defined $main::RD_TRACE
2162	72	0	defined $_[4] ? :
2164	72	0	$#arg & 1 ? :
2179	0	72	if defined $main::RD_TRACE
2192	0	72	if defined $main::RD_TRACE
2200	72	0	if $lastsep = $1
	0	72	if ($text =~ s/\A($Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::skip)/'' if $lastsep = $1;/e and $text =~ /\A(?:[()])/)
2204	0	0	if defined $main::RD_TRACE
2212	0	72	if defined $main::RD_TRACE
2219	0	72	if defined $main::RD_TRACE
2226	2	70	unless (defined($_tok = NIL($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
2229	0	2	if defined $main::RD_TRACE
2237	0	70	if defined $main::RD_TRACE
2249	0	70	if defined $main::RD_TRACE
2262	2	70	unless $_matched
2267	0	2	if defined $main::RD_TRACE
2280	0	2	if defined $main::RD_TRACE
2287	0	2	unless (defined($_tok = STRING($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
2290	0	0	if defined $main::RD_TRACE
2298	0	2	if defined $main::RD_TRACE
2310	0	2	if defined $main::RD_TRACE
2323	0	72	unless $_matched
2325	0	72	unless ($_matched or defined $score)
2331	0	0	if defined $main::RD_TRACE
2338	0	72	if (not defined $return and defined $score)
2340	0	0	if defined $main::RD_TRACE
2347	72	0	unless defined $return
2348	0	72	if (defined $main::RD_TRACE)
2373	0	102	if defined $main::RD_TRACE
2392	102	0	defined $_[4] ? :
2394	102	0	$#arg & 1 ? :
2409	0	102	if defined $main::RD_TRACE
2422	0	102	if defined $main::RD_TRACE
2429	11	91	unless (defined($_tok = NIL($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
2432	0	11	if defined $main::RD_TRACE
2440	0	91	if defined $main::RD_TRACE
2452	0	91	if defined $main::RD_TRACE
2465	11	91	unless $_matched
2470	0	11	if defined $main::RD_TRACE
2483	0	11	if defined $main::RD_TRACE
2490	11	0	unless (defined($_tok = STRING($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
2493	0	11	if defined $main::RD_TRACE
2501	0	0	if defined $main::RD_TRACE
2513	0	0	if defined $main::RD_TRACE
2526	11	91	unless $_matched
2531	0	11	if defined $main::RD_TRACE
2544	0	11	if defined $main::RD_TRACE
2551	10	1	unless (defined($_tok = STRINGS($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
2554	0	10	if defined $main::RD_TRACE
2562	0	1	if defined $main::RD_TRACE
2574	0	1	if defined $main::RD_TRACE
2587	10	92	unless $_matched
2589	10	92	unless ($_matched or defined $score)
2595	0	10	if defined $main::RD_TRACE
2602	0	92	if (not defined $return and defined $score)
2604	0	0	if defined $main::RD_TRACE
2611	92	0	unless defined $return
2612	0	92	if (defined $main::RD_TRACE)
2637	0	30	if defined $main::RD_TRACE
2656	30	0	defined $_[4] ? :
2658	30	0	$#arg & 1 ? :
2673	0	30	if defined $main::RD_TRACE
2686	0	30	if defined $main::RD_TRACE
2693	9	21	unless (defined($_tok = NIL($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
2696	0	9	if defined $main::RD_TRACE
2704	0	21	if defined $main::RD_TRACE
2716	0	21	if defined $main::RD_TRACE
2729	9	21	unless $_matched
2734	0	9	if defined $main::RD_TRACE
2747	0	9	if defined $main::RD_TRACE
2754	9	0	unless (defined($_tok = STRING($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
2757	0	9	if defined $main::RD_TRACE
2765	0	0	if defined $main::RD_TRACE
2777	0	0	if defined $main::RD_TRACE
2790	9	21	unless $_matched
2792	9	21	unless ($_matched or defined $score)
2798	0	9	if defined $main::RD_TRACE
2805	0	21	if (not defined $return and defined $score)
2807	0	0	if defined $main::RD_TRACE
2814	21	0	unless defined $return
2815	0	21	if (defined $main::RD_TRACE)
2840	0	24	if defined $main::RD_TRACE
2859	24	0	defined $_[4] ? :
2861	24	0	$#arg & 1 ? :
2876	0	24	if defined $main::RD_TRACE
2889	0	24	if defined $main::RD_TRACE
2896	1	23	unless (defined($_tok = NIL($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
2899	0	1	if defined $main::RD_TRACE
2907	0	23	if defined $main::RD_TRACE
2919	0	23	if defined $main::RD_TRACE
2932	1	23	unless $_matched
2937	0	1	if defined $main::RD_TRACE
2950	0	1	if defined $main::RD_TRACE
2957	0	1	unless (defined($_tok = STRING($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
2960	0	0	if defined $main::RD_TRACE
2968	0	1	if defined $main::RD_TRACE
2980	0	1	if defined $main::RD_TRACE
2993	0	24	unless $_matched
2995	0	24	unless ($_matched or defined $score)
3001	0	0	if defined $main::RD_TRACE
3008	0	24	if (not defined $return and defined $score)
3010	0	0	if defined $main::RD_TRACE
3017	24	0	unless defined $return
3018	0	24	if (defined $main::RD_TRACE)
3043	0	144	if defined $main::RD_TRACE
3062	144	0	defined $_[4] ? :
3064	144	0	$#arg & 1 ? :
3079	0	144	if defined $main::RD_TRACE
3092	0	144	if defined $main::RD_TRACE
3099	98	46	unless (defined($_tok = NIL($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
3102	0	98	if defined $main::RD_TRACE
3110	0	46	if defined $main::RD_TRACE
3122	0	46	if defined $main::RD_TRACE
3135	98	46	unless $_matched
3140	0	98	if defined $main::RD_TRACE
3153	0	98	if defined $main::RD_TRACE
3160	94	4	unless (defined($_tok = RFCNONCOMPLY($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
3163	0	94	if defined $main::RD_TRACE
3171	0	4	if defined $main::RD_TRACE
3183	0	4	if defined $main::RD_TRACE
3196	94	50	unless $_matched
3201	0	94	if defined $main::RD_TRACE
3214	0	94	if defined $main::RD_TRACE
3223	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 })
3228	0	0	if defined $lastsep
3231	0	0	if defined $main::RD_TRACE
3236	0	94	if defined $main::RD_TRACE
3243	0	94	if defined $main::RD_TRACE
3250	0	94	unless (defined($_tok = $thisparser->_parserepeat($text, \&Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::addressstruct, 1, 100000000, $_noactions, $expectation, sub { \@arg; } , undef)))
3252	0	0	if defined $main::RD_TRACE
3259	0	94	if defined $main::RD_TRACE
3271	0	94	if defined $main::RD_TRACE
3280	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 })
3285	0	0	if defined $lastsep
3288	0	0	if defined $main::RD_TRACE
3293	0	94	if defined $main::RD_TRACE
3300	0	94	if defined $main::RD_TRACE
3307	0	94	$_noactions ? :
3308	0	94	unless (defined $_tok)
3310	0	0	if defined $main::RD_TRACE
3314	0	94	if defined $main::RD_TRACE
3322	0	94	if defined $main::RD_TRACE
3335	0	144	unless $_matched
3337	0	144	unless ($_matched or defined $score)
3343	0	0	if defined $main::RD_TRACE
3350	0	144	if (not defined $return and defined $score)
3352	0	0	if defined $main::RD_TRACE
3359	50	94	unless defined $return
3360	0	144	if (defined $main::RD_TRACE)
3385	0	129	if defined $main::RD_TRACE
3404	129	0	defined $_[4] ? :
3406	129	0	$#arg & 1 ? :
3421	0	129	if defined $main::RD_TRACE
3434	0	129	if defined $main::RD_TRACE
3441	0	129	unless (defined($_tok = STRING($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
3444	0	0	if defined $main::RD_TRACE
3452	0	129	if defined $main::RD_TRACE
3464	0	129	if defined $main::RD_TRACE
3477	0	129	unless $_matched
3479	0	129	unless ($_matched or defined $score)
3485	0	0	if defined $main::RD_TRACE
3492	0	129	if (not defined $return and defined $score)
3494	0	0	if defined $main::RD_TRACE
3501	129	0	unless defined $return
3502	0	129	if (defined $main::RD_TRACE)
3527	0	53	if defined $main::RD_TRACE
3546	53	0	defined $_[4] ? :
3548	53	0	$#arg & 1 ? :
3563	0	53	if defined $main::RD_TRACE
3576	0	53	if defined $main::RD_TRACE
3583	31	22	unless (defined($_tok = MESSAGE($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
3586	0	31	if defined $main::RD_TRACE
3594	0	22	if defined $main::RD_TRACE
3606	0	22	if defined $main::RD_TRACE
3613	1	21	unless (defined($_tok = RFC822($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
3616	0	1	if defined $main::RD_TRACE
3624	0	21	if defined $main::RD_TRACE
3636	0	21	if defined $main::RD_TRACE
3643	0	21	$_noactions ? :
3644	0	21	unless (defined $_tok)
3646	0	0	if defined $main::RD_TRACE
3650	0	21	if defined $main::RD_TRACE
3658	0	21	if defined $main::RD_TRACE
3671	32	21	unless $_matched
3673	32	21	unless ($_matched or defined $score)
3679	0	32	if defined $main::RD_TRACE
3686	0	21	if (not defined $return and defined $score)
3688	0	0	if defined $main::RD_TRACE
3695	0	21	unless defined $return
3696	0	21	if (defined $main::RD_TRACE)
3721	0	24	if defined $main::RD_TRACE
3740	24	0	defined $_[4] ? :
3742	24	0	$#arg & 1 ? :
3757	0	24	if defined $main::RD_TRACE
3770	0	24	if defined $main::RD_TRACE
3777	0	24	unless (defined($_tok = ADDRESSES($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
3780	0	0	if defined $main::RD_TRACE
3788	0	24	if defined $main::RD_TRACE
3800	0	24	if defined $main::RD_TRACE
3813	0	24	unless $_matched
3815	0	24	unless ($_matched or defined $score)
3821	0	0	if defined $main::RD_TRACE
3828	0	24	if (not defined $return and defined $score)
3830	0	0	if defined $main::RD_TRACE
3837	24	0	unless defined $return
3838	0	24	if (defined $main::RD_TRACE)
3863	0	102	if defined $main::RD_TRACE
3882	102	0	defined $_[4] ? :
3884	102	0	$#arg & 1 ? :
3899	0	102	if defined $main::RD_TRACE
3912	0	102	if defined $main::RD_TRACE
3919	38	64	unless (defined($_tok = NIL($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
3922	0	38	if defined $main::RD_TRACE
3930	0	64	if defined $main::RD_TRACE
3942	0	64	if defined $main::RD_TRACE
3955	38	64	unless $_matched
3960	0	38	if defined $main::RD_TRACE
3973	0	38	if defined $main::RD_TRACE
3980	10	28	unless (defined($_tok = KVPAIRS($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
3983	0	10	if defined $main::RD_TRACE
3991	0	28	if defined $main::RD_TRACE
4003	0	28	if defined $main::RD_TRACE
4016	10	92	unless $_matched
4018	10	92	unless ($_matched or defined $score)
4024	0	10	if defined $main::RD_TRACE
4031	0	92	if (not defined $return and defined $score)
4033	0	0	if defined $main::RD_TRACE
4040	92	0	unless defined $return
4041	0	92	if (defined $main::RD_TRACE)
4066	0	133	if defined $main::RD_TRACE
4085	133	0	defined $_[4] ? :
4087	133	0	$#arg & 1 ? :
4102	0	133	if defined $main::RD_TRACE
4115	0	133	if defined $main::RD_TRACE
4124	120	13	if $lastsep = $1
	13	120	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 })
4129	13	0	if defined $lastsep
4132	0	13	if defined $main::RD_TRACE
4137	0	120	if defined $main::RD_TRACE
4144	0	120	if defined $main::RD_TRACE
4151	0	120	unless (defined($_tok = $thisparser->_parserepeat($text, \&Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::kvpair, 1, 100000000, $_noactions, $expectation, sub { \@arg; } , undef)))
4153	0	0	if defined $main::RD_TRACE
4160	0	120	if defined $main::RD_TRACE
4172	0	120	if defined $main::RD_TRACE
4181	0	120	if $lastsep = $1
	0	120	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 })
4186	0	0	if defined $lastsep
4189	0	0	if defined $main::RD_TRACE
4194	0	120	if defined $main::RD_TRACE
4201	0	120	if defined $main::RD_TRACE
4208	0	120	$_noactions ? :
4209	0	120	unless (defined $_tok)
4211	0	0	if defined $main::RD_TRACE
4215	0	120	if defined $main::RD_TRACE
4223	0	120	if defined $main::RD_TRACE
4236	13	120	unless $_matched
4238	13	120	unless ($_matched or defined $score)
4244	0	13	if defined $main::RD_TRACE
4251	0	120	if (not defined $return and defined $score)
4253	0	0	if defined $main::RD_TRACE
4260	0	120	unless defined $return
4261	0	120	if (defined $main::RD_TRACE)
4286	0	72	if defined $main::RD_TRACE
4305	72	0	defined $_[4] ? :
4307	72	0	$#arg & 1 ? :
4322	0	72	if defined $main::RD_TRACE
4335	0	72	if defined $main::RD_TRACE
4342	8	64	unless (defined($_tok = NIL($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
4345	0	8	if defined $main::RD_TRACE
4353	0	64	if defined $main::RD_TRACE
4365	0	64	if defined $main::RD_TRACE
4378	8	64	unless $_matched
4383	0	8	if defined $main::RD_TRACE
4396	0	8	if defined $main::RD_TRACE
4403	7	1	unless (defined($_tok = STRING($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
4406	0	7	if defined $main::RD_TRACE
4414	0	1	if defined $main::RD_TRACE
4426	0	1	if defined $main::RD_TRACE
4439	7	65	unless $_matched
4441	7	65	unless ($_matched or defined $score)
4447	0	7	if defined $main::RD_TRACE
4454	0	65	if (not defined $return and defined $score)
4456	0	0	if defined $main::RD_TRACE
4463	65	0	unless defined $return
4464	0	65	if (defined $main::RD_TRACE)
4489	0	122	if defined $main::RD_TRACE
4508	122	0	defined $_[4] ? :
4510	122	0	$#arg & 1 ? :
4525	0	122	if defined $main::RD_TRACE
4538	0	122	if defined $main::RD_TRACE
4545	92	30	unless (defined($_tok = multipart($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
4548	0	92	if defined $main::RD_TRACE
4556	0	30	if defined $main::RD_TRACE
4568	0	30	if defined $main::RD_TRACE
4575	0	30	$_noactions ? :
4576	0	30	unless (defined $_tok)
4578	0	0	if defined $main::RD_TRACE
4582	0	30	if defined $main::RD_TRACE
4590	0	30	if defined $main::RD_TRACE
4603	92	30	unless $_matched
4608	0	92	if defined $main::RD_TRACE
4621	0	92	if defined $main::RD_TRACE
4628	53	39	unless (defined($_tok = textmessage($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
4631	0	53	if defined $main::RD_TRACE
4639	0	39	if defined $main::RD_TRACE
4651	0	39	if defined $main::RD_TRACE
4658	0	39	$_noactions ? :
4659	0	39	unless (defined $_tok)
4661	0	0	if defined $main::RD_TRACE
4665	0	39	if defined $main::RD_TRACE
4673	0	39	if defined $main::RD_TRACE
4686	53	69	unless $_matched
4691	0	53	if defined $main::RD_TRACE
4704	0	53	if defined $main::RD_TRACE
4711	32	21	unless (defined($_tok = nestedmessage($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
4714	0	32	if defined $main::RD_TRACE
4722	0	21	if defined $main::RD_TRACE
4734	0	21	if defined $main::RD_TRACE
4741	0	21	$_noactions ? :
4742	0	21	unless (defined $_tok)
4744	0	0	if defined $main::RD_TRACE
4748	0	21	if defined $main::RD_TRACE
4756	0	21	if defined $main::RD_TRACE
4769	32	90	unless $_matched
4774	0	32	if defined $main::RD_TRACE
4787	0	32	if defined $main::RD_TRACE
4794	20	12	unless (defined($_tok = othertypemessage($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
4797	0	20	if defined $main::RD_TRACE
4805	0	12	if defined $main::RD_TRACE
4817	0	12	if defined $main::RD_TRACE
4824	0	12	$_noactions ? :
4825	0	12	unless (defined $_tok)
4827	0	0	if defined $main::RD_TRACE
4831	0	12	if defined $main::RD_TRACE
4839	0	12	if defined $main::RD_TRACE
4852	20	102	unless $_matched
4854	20	102	unless ($_matched or defined $score)
4860	0	20	if defined $main::RD_TRACE
4867	0	102	if (not defined $return and defined $score)
4869	0	0	if defined $main::RD_TRACE
4876	0	102	unless defined $return
4877	0	102	if (defined $main::RD_TRACE)
4902	0	92	if defined $main::RD_TRACE
4921	92	0	defined $_[4] ? :
4923	92	0	$#arg & 1 ? :
4938	0	92	if defined $main::RD_TRACE
4951	0	92	if defined $main::RD_TRACE
4959	0	92	if $lastsep = $1
	53	39	unless ($text =~ s/\A($Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::skip)/'' if $lastsep = $1;/e and $text =~ /\A(?:^"TEXT"|^TEXT)/i)
4961	53	0	if defined $lastsep
4963	0	53	if defined $main::RD_TRACE
4971	0	39	if defined $main::RD_TRACE
4978	0	39	if defined $main::RD_TRACE
4985	0	39	$_noactions ? :
4986	0	39	unless (defined $_tok)
4988	0	0	if defined $main::RD_TRACE
4992	0	39	if defined $main::RD_TRACE
5000	0	39	if defined $main::RD_TRACE
5013	53	39	unless $_matched
5015	53	39	unless ($_matched or defined $score)
5021	0	53	if defined $main::RD_TRACE
5028	0	39	if (not defined $return and defined $score)
5030	0	0	if defined $main::RD_TRACE
5037	0	39	unless defined $return
5038	0	39	if (defined $main::RD_TRACE)
5063	0	53	if defined $main::RD_TRACE
5082	53	0	defined $_[4] ? :
5084	53	0	$#arg & 1 ? :
5099	0	53	if defined $main::RD_TRACE
5112	0	53	if defined $main::RD_TRACE
5120	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)
5122	31	0	if defined $lastsep
5124	0	31	if defined $main::RD_TRACE
5132	0	22	if defined $main::RD_TRACE
5139	0	22	if defined $main::RD_TRACE
5146	0	22	$_noactions ? :
5147	0	22	unless (defined $_tok)
5149	0	0	if defined $main::RD_TRACE
5153	0	22	if defined $main::RD_TRACE
5161	0	22	if defined $main::RD_TRACE
5174	31	22	unless $_matched
5176	31	22	unless ($_matched or defined $score)
5182	0	31	if defined $main::RD_TRACE
5189	0	22	if (not defined $return and defined $score)
5191	0	0	if defined $main::RD_TRACE
5198	0	22	unless defined $return
5199	0	22	if (defined $main::RD_TRACE)
5224	0	9	if defined $main::RD_TRACE
5243	9	0	defined $_[4] ? :
5245	9	0	$#arg & 1 ? :
5260	0	9	if defined $main::RD_TRACE
5273	0	9	if defined $main::RD_TRACE
5281	0	9	if $lastsep = $1
	0	9	unless ($text =~ s/\A($Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::skip)/'' if $lastsep = $1;/e and $text =~ /\A(?:.*?\(.*?BODYSTRUCTURE \()/i)
5283	0	0	if defined $lastsep
5285	0	0	if defined $main::RD_TRACE
5293	0	9	if defined $main::RD_TRACE
5300	0	9	if defined $main::RD_TRACE
5307	0	9	unless (defined($_tok = $thisparser->_parserepeat($text, \&Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::part, 1, 1, $_noactions, $expectation, sub { \@arg; } , undef)))
5309	0	0	if defined $main::RD_TRACE
5316	0	9	if defined $main::RD_TRACE
5328	0	9	if defined $main::RD_TRACE
5336	0	9	if $lastsep = $1
	0	9	unless ($text =~ s/\A($Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::skip)/'' if $lastsep = $1;/e and $text =~ /\A(?:\).*\)\r?\n?)/)
5338	0	0	if defined $lastsep
5340	0	0	if defined $main::RD_TRACE
5348	0	9	if defined $main::RD_TRACE
5355	0	9	if defined $main::RD_TRACE
5362	0	9	$_noactions ? :
5363	0	9	unless (defined $_tok)
5365	0	0	if defined $main::RD_TRACE
5369	0	9	if defined $main::RD_TRACE
5377	0	9	if defined $main::RD_TRACE
5390	0	9	unless $_matched
5392	0	9	unless ($_matched or defined $score)
5398	0	0	if defined $main::RD_TRACE
5405	0	9	if (not defined $return and defined $score)
5407	0	0	if defined $main::RD_TRACE
5414	0	9	unless defined $return
5415	0	9	if (defined $main::RD_TRACE)
5440	0	188	if defined $main::RD_TRACE
5459	188	0	defined $_[4] ? :
5461	188	0	$#arg & 1 ? :
5476	0	188	if defined $main::RD_TRACE
5489	0	188	if defined $main::RD_TRACE
5498	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 })
5503	94	0	if defined $lastsep
5506	0	94	if defined $main::RD_TRACE
5511	0	94	if defined $main::RD_TRACE
5518	0	94	if defined $main::RD_TRACE
5525	0	94	unless (defined($_tok = personalname($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
5528	0	0	if defined $main::RD_TRACE
5536	0	94	if defined $main::RD_TRACE
5548	0	94	if defined $main::RD_TRACE
5555	0	94	unless (defined($_tok = sourceroute($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
5558	0	0	if defined $main::RD_TRACE
5566	0	94	if defined $main::RD_TRACE
5578	0	94	if defined $main::RD_TRACE
5585	0	94	unless (defined($_tok = mailboxname($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
5588	0	0	if defined $main::RD_TRACE
5596	0	94	if defined $main::RD_TRACE
5608	0	94	if defined $main::RD_TRACE
5615	0	94	unless (defined($_tok = hostname($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
5618	0	0	if defined $main::RD_TRACE
5626	0	94	if defined $main::RD_TRACE
5638	0	94	if defined $main::RD_TRACE
5647	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 })
5652	0	0	if defined $lastsep
5655	0	0	if defined $main::RD_TRACE
5660	0	94	if defined $main::RD_TRACE
5667	0	94	if defined $main::RD_TRACE
5674	0	94	$_noactions ? :
5680	0	94	unless (defined $_tok)
5682	0	0	if defined $main::RD_TRACE
5686	0	94	if defined $main::RD_TRACE
5694	0	94	if defined $main::RD_TRACE
5707	94	94	unless $_matched
5709	94	94	unless ($_matched or defined $score)
5715	0	94	if defined $main::RD_TRACE
5722	0	94	if (not defined $return and defined $score)
5724	0	0	if defined $main::RD_TRACE
5731	94	0	unless defined $return
5732	0	94	if (defined $main::RD_TRACE)
5757	0	24	if defined $main::RD_TRACE
5776	24	0	defined $_[4] ? :
5778	24	0	$#arg & 1 ? :
5793	0	24	if defined $main::RD_TRACE
5806	0	24	if defined $main::RD_TRACE
5813	24	0	unless (defined($_tok = NIL($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
5816	0	24	if defined $main::RD_TRACE
5824	0	0	if defined $main::RD_TRACE
5836	0	0	if defined $main::RD_TRACE
5849	24	0	unless $_matched
5854	0	24	if defined $main::RD_TRACE
5867	0	24	if defined $main::RD_TRACE
5874	0	24	unless (defined($_tok = STRING($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
5877	0	0	if defined $main::RD_TRACE
5885	0	24	if defined $main::RD_TRACE
5897	0	24	if defined $main::RD_TRACE
5910	0	24	unless $_matched
5912	0	24	unless ($_matched or defined $score)
5918	0	0	if defined $main::RD_TRACE
5925	0	24	if (not defined $return and defined $score)
5927	0	0	if defined $main::RD_TRACE
5934	24	0	unless defined $return
5935	0	24	if (defined $main::RD_TRACE)
5960	0	94	if defined $main::RD_TRACE
5979	94	0	defined $_[4] ? :
5981	94	0	$#arg & 1 ? :
5996	0	94	if defined $main::RD_TRACE
6009	0	94	if defined $main::RD_TRACE
6016	94	0	unless (defined($_tok = NIL($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
6019	0	94	if defined $main::RD_TRACE
6027	0	0	if defined $main::RD_TRACE
6039	0	0	if defined $main::RD_TRACE
6052	94	0	unless $_matched
6057	0	94	if defined $main::RD_TRACE
6070	0	94	if defined $main::RD_TRACE
6077	0	94	unless (defined($_tok = STRING($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
6080	0	0	if defined $main::RD_TRACE
6088	0	94	if defined $main::RD_TRACE
6100	0	94	if defined $main::RD_TRACE
6113	0	94	unless $_matched
6115	0	94	unless ($_matched or defined $score)
6121	0	0	if defined $main::RD_TRACE
6128	0	94	if (not defined $return and defined $score)
6130	0	0	if defined $main::RD_TRACE
6137	94	0	unless defined $return
6138	0	94	if (defined $main::RD_TRACE)
6163	0	51	if defined $main::RD_TRACE
6182	51	0	defined $_[4] ? :
6184	51	0	$#arg & 1 ? :
6199	0	51	if defined $main::RD_TRACE
6212	0	51	if defined $main::RD_TRACE
6220	51	0	if $lastsep = $1
	43	8	unless ($text =~ s/\A($Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::skip)/'' if $lastsep = $1;/e and $text =~ /\A(?:"HTML"|HTML)/i)
6222	43	0	if defined $lastsep
6224	0	43	if defined $main::RD_TRACE
6232	0	8	if defined $main::RD_TRACE
6239	0	8	if defined $main::RD_TRACE
6246	0	8	$_noactions ? :
6247	0	8	unless (defined $_tok)
6249	0	0	if defined $main::RD_TRACE
6253	0	8	if defined $main::RD_TRACE
6261	0	8	if defined $main::RD_TRACE
6274	43	8	unless $_matched
6276	43	8	unless ($_matched or defined $score)
6282	0	43	if defined $main::RD_TRACE
6289	0	8	if (not defined $return and defined $score)
6291	0	0	if defined $main::RD_TRACE
6298	0	8	unless defined $return
6299	0	8	if (defined $main::RD_TRACE)
6324	0	249	if defined $main::RD_TRACE
6343	249	0	defined $_[4] ? :
6345	249	0	$#arg & 1 ? :
6360	0	249	if defined $main::RD_TRACE
6373	0	249	if defined $main::RD_TRACE
6382	9	240	if $lastsep = $1
	120	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 })
6390	0	120	if defined $main::RD_TRACE
6395	0	129	if defined $main::RD_TRACE
6402	0	129	if defined $main::RD_TRACE
6409	0	129	unless (defined($_tok = key($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
6412	0	0	if defined $main::RD_TRACE
6420	0	129	if defined $main::RD_TRACE
6432	0	129	if defined $main::RD_TRACE
6439	0	129	unless (defined($_tok = value($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
6442	0	0	if defined $main::RD_TRACE
6450	0	129	if defined $main::RD_TRACE
6462	0	129	if defined $main::RD_TRACE
6469	0	129	$_noactions ? :
6470	0	129	unless (defined $_tok)
6472	0	0	if defined $main::RD_TRACE
6476	0	129	if defined $main::RD_TRACE
6484	0	129	if defined $main::RD_TRACE
6497	120	129	unless $_matched
6499	120	129	unless ($_matched or defined $score)
6505	0	120	if defined $main::RD_TRACE
6512	0	129	if (not defined $return and defined $score)
6514	0	0	if defined $main::RD_TRACE
6521	0	129	unless defined $return
6522	0	129	if (defined $main::RD_TRACE)
6547	0	24	if defined $main::RD_TRACE
6566	24	0	defined $_[4] ? :
6568	24	0	$#arg & 1 ? :
6583	0	24	if defined $main::RD_TRACE
6596	0	24	if defined $main::RD_TRACE
6603	0	24	unless (defined($_tok = ADDRESSES($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
6606	0	0	if defined $main::RD_TRACE
6614	0	24	if defined $main::RD_TRACE
6626	0	24	if defined $main::RD_TRACE
6639	0	24	unless $_matched
6641	0	24	unless ($_matched or defined $score)
6647	0	0	if defined $main::RD_TRACE
6654	0	24	if (not defined $return and defined $score)
6656	0	0	if defined $main::RD_TRACE
6663	24	0	unless defined $return
6664	0	24	if (defined $main::RD_TRACE)
6689	0	94	if defined $main::RD_TRACE
6708	94	0	defined $_[4] ? :
6710	94	0	$#arg & 1 ? :
6725	0	94	if defined $main::RD_TRACE
6738	0	94	if defined $main::RD_TRACE
6745	94	0	unless (defined($_tok = NIL($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
6748	0	94	if defined $main::RD_TRACE
6756	0	0	if defined $main::RD_TRACE
6768	0	0	if defined $main::RD_TRACE
6781	94	0	unless $_matched
6786	0	94	if defined $main::RD_TRACE
6799	0	94	if defined $main::RD_TRACE
6806	0	94	unless (defined($_tok = STRING($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
6809	0	0	if defined $main::RD_TRACE
6817	0	94	if defined $main::RD_TRACE
6829	0	94	if defined $main::RD_TRACE
6842	0	94	unless $_matched
6844	0	94	unless ($_matched or defined $score)
6850	0	0	if defined $main::RD_TRACE
6857	0	94	if (not defined $return and defined $score)
6859	0	0	if defined $main::RD_TRACE
6866	94	0	unless defined $return
6867	0	94	if (defined $main::RD_TRACE)
6892	0	51	if defined $main::RD_TRACE
6911	51	0	defined $_[4] ? :
6913	51	0	$#arg & 1 ? :
6928	0	51	if defined $main::RD_TRACE
6941	0	51	if defined $main::RD_TRACE
6948	0	51	unless (defined($_tok = bodysubtype($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
6951	0	0	if defined $main::RD_TRACE
6959	0	51	if defined $main::RD_TRACE
6971	0	51	if defined $main::RD_TRACE
6978	0	51	unless (defined($_tok = $thisparser->_parserepeat($text, \&Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::bodyparms, 0, 1, $_noactions, $expectation, sub { \@arg; } , undef)))
6980	0	0	if defined $main::RD_TRACE
6987	0	51	if defined $main::RD_TRACE
6999	0	51	if defined $main::RD_TRACE
7006	0	51	unless (defined($_tok = $thisparser->_parserepeat($text, \&Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::bodyid, 0, 1, $_noactions, $expectation, sub { \@arg; } , undef)))
7008	0	0	if defined $main::RD_TRACE
7015	0	51	if defined $main::RD_TRACE
7027	0	51	if defined $main::RD_TRACE
7034	0	51	unless (defined($_tok = $thisparser->_parserepeat($text, \&Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::bodydesc, 0, 1, $_noactions, $expectation, sub { \@arg; } , undef)))
7036	0	0	if defined $main::RD_TRACE
7043	0	51	if defined $main::RD_TRACE
7055	0	51	if defined $main::RD_TRACE
7062	0	51	unless (defined($_tok = $thisparser->_parserepeat($text, \&Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::bodyenc, 0, 1, $_noactions, $expectation, sub { \@arg; } , undef)))
7064	0	0	if defined $main::RD_TRACE
7071	0	51	if defined $main::RD_TRACE
7083	0	51	if defined $main::RD_TRACE
7090	0	51	unless (defined($_tok = $thisparser->_parserepeat($text, \&Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::bodysize, 0, 1, $_noactions, $expectation, sub { \@arg; } , undef)))
7092	0	0	if defined $main::RD_TRACE
7099	0	51	if defined $main::RD_TRACE
7111	0	51	if defined $main::RD_TRACE
7118	0	51	$_noactions ? :
7123	0	51	unless (defined $_tok)
7125	0	0	if defined $main::RD_TRACE
7129	0	51	if defined $main::RD_TRACE
7137	0	51	if defined $main::RD_TRACE
7150	0	51	unless $_matched
7152	0	51	unless ($_matched or defined $score)
7158	0	0	if defined $main::RD_TRACE
7165	0	51	if (not defined $return and defined $score)
7167	0	0	if defined $main::RD_TRACE
7174	0	51	unless defined $return
7175	0	51	if (defined $main::RD_TRACE)
7200	0	72	if defined $main::RD_TRACE
7219	72	0	defined $_[4] ? :
7221	72	0	$#arg & 1 ? :
7236	0	72	if defined $main::RD_TRACE
7249	0	72	if defined $main::RD_TRACE
7257	72	0	if $lastsep = $1
	0	72	if ($text =~ s/\A($Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::skip)/'' if $lastsep = $1;/e and $text =~ /\A(?:[()])/)
7261	0	0	if defined $main::RD_TRACE
7269	0	72	if defined $main::RD_TRACE
7276	0	72	if defined $main::RD_TRACE
7283	72	0	unless (defined($_tok = NIL($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
7286	0	72	if defined $main::RD_TRACE
7294	0	0	if defined $main::RD_TRACE
7306	0	0	if defined $main::RD_TRACE
7319	72	0	unless $_matched
7324	0	72	if defined $main::RD_TRACE
7337	0	72	if defined $main::RD_TRACE
7344	0	72	unless (defined($_tok = NUMBER($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
7347	0	0	if defined $main::RD_TRACE
7355	0	72	if defined $main::RD_TRACE
7367	0	72	if defined $main::RD_TRACE
7380	0	72	unless $_matched
7382	0	72	unless ($_matched or defined $score)
7388	0	0	if defined $main::RD_TRACE
7395	0	72	if (not defined $return and defined $score)
7397	0	0	if defined $main::RD_TRACE
7404	72	0	unless defined $return
7405	0	72	if (defined $main::RD_TRACE)
7430	0	32	if defined $main::RD_TRACE
7449	32	0	defined $_[4] ? :
7451	32	0	$#arg & 1 ? :
7466	0	32	if defined $main::RD_TRACE
7479	0	32	if defined $main::RD_TRACE
7486	20	12	unless (defined($_tok = bodytype($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
7489	0	20	if defined $main::RD_TRACE
7497	0	12	if defined $main::RD_TRACE
7509	0	12	if defined $main::RD_TRACE
7516	0	12	unless (defined($_tok = basicfields($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
7519	0	0	if defined $main::RD_TRACE
7527	0	12	if defined $main::RD_TRACE
7539	0	12	if defined $main::RD_TRACE
7546	0	12	unless (defined($_tok = $thisparser->_parserepeat($text, \&Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::bodyMD5, 0, 1, $_noactions, $expectation, sub { \@arg; } , undef)))
7548	0	0	if defined $main::RD_TRACE
7555	0	12	if defined $main::RD_TRACE
7567	0	12	if defined $main::RD_TRACE
7574	0	12	unless (defined($_tok = $thisparser->_parserepeat($text, \&Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::bodydisp, 0, 1, $_noactions, $expectation, sub { \@arg; } , undef)))
7576	0	0	if defined $main::RD_TRACE
7583	0	12	if defined $main::RD_TRACE
7595	0	12	if defined $main::RD_TRACE
7602	0	12	unless (defined($_tok = $thisparser->_parserepeat($text, \&Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::bodylang, 0, 1, $_noactions, $expectation, sub { \@arg; } , undef)))
7604	0	0	if defined $main::RD_TRACE
7611	0	12	if defined $main::RD_TRACE
7623	0	12	if defined $main::RD_TRACE
7630	0	12	unless (defined($_tok = $thisparser->_parserepeat($text, \&Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::bodyextra, 0, 1, $_noactions, $expectation, sub { \@arg; } , undef)))
7632	0	0	if defined $main::RD_TRACE
7639	0	12	if defined $main::RD_TRACE
7651	0	12	if defined $main::RD_TRACE
7658	0	12	$_noactions ? :
7664	0	12	unless (defined $_tok)
7666	0	0	if defined $main::RD_TRACE
7670	0	12	if defined $main::RD_TRACE
7678	0	12	if defined $main::RD_TRACE
7691	20	12	unless $_matched
7693	20	12	unless ($_matched or defined $score)
7699	0	20	if defined $main::RD_TRACE
7706	0	12	if (not defined $return and defined $score)
7708	0	0	if defined $main::RD_TRACE
7715	0	12	unless defined $return
7716	0	12	if (defined $main::RD_TRACE)
7741	0	72	if defined $main::RD_TRACE
7760	72	0	defined $_[4] ? :
7762	72	0	$#arg & 1 ? :
7777	0	72	if defined $main::RD_TRACE
7790	0	72	if defined $main::RD_TRACE
7798	72	0	if $lastsep = $1
	0	72	if ($text =~ s/\A($Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::skip)/'' if $lastsep = $1;/e and $text =~ /\A(?:[()])/)
7802	0	0	if defined $main::RD_TRACE
7810	0	72	if defined $main::RD_TRACE
7817	0	72	if defined $main::RD_TRACE
7824	21	51	unless (defined($_tok = NIL($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
7827	0	21	if defined $main::RD_TRACE
7835	0	51	if defined $main::RD_TRACE
7847	0	51	if defined $main::RD_TRACE
7860	21	51	unless $_matched
7865	0	21	if defined $main::RD_TRACE
7878	0	21	if defined $main::RD_TRACE
7885	0	21	unless (defined($_tok = STRING($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
7888	0	0	if defined $main::RD_TRACE
7896	0	21	if defined $main::RD_TRACE
7908	0	21	if defined $main::RD_TRACE
7921	0	72	unless $_matched
7923	0	72	unless ($_matched or defined $score)
7929	0	0	if defined $main::RD_TRACE
7936	0	72	if (not defined $return and defined $score)
7938	0	0	if defined $main::RD_TRACE
7945	72	0	unless defined $return
7946	0	72	if (defined $main::RD_TRACE)
7971	0	72	if defined $main::RD_TRACE
7990	72	0	defined $_[4] ? :
7992	72	0	$#arg & 1 ? :
8007	0	72	if defined $main::RD_TRACE
8020	0	72	if defined $main::RD_TRACE
8027	72	0	unless (defined($_tok = NIL($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
8030	0	72	if defined $main::RD_TRACE
8038	0	0	if defined $main::RD_TRACE
8050	0	0	if defined $main::RD_TRACE
8063	72	0	unless $_matched
8068	0	72	if defined $main::RD_TRACE
8081	0	72	if defined $main::RD_TRACE
8088	0	72	unless (defined($_tok = STRING($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
8091	0	0	if defined $main::RD_TRACE
8099	0	72	if defined $main::RD_TRACE
8111	0	72	if defined $main::RD_TRACE
8124	0	72	unless $_matched
8129	0	0	if defined $main::RD_TRACE
8142	0	0	if defined $main::RD_TRACE
8149	0	0	unless (defined($_tok = KVPAIRS($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
8152	0	0	if defined $main::RD_TRACE
8160	0	0	if defined $main::RD_TRACE
8172	0	0	if defined $main::RD_TRACE
8185	0	72	unless $_matched
8187	0	72	unless ($_matched or defined $score)
8193	0	0	if defined $main::RD_TRACE
8200	0	72	if (not defined $return and defined $score)
8202	0	0	if defined $main::RD_TRACE
8209	72	0	unless defined $return
8210	0	72	if (defined $main::RD_TRACE)
8235	0	824	if defined $main::RD_TRACE
8254	824	0	defined $_[4] ? :
8256	824	0	$#arg & 1 ? :
8271	0	824	if defined $main::RD_TRACE
8284	0	824	if defined $main::RD_TRACE
8291	112	712	unless (defined($_tok = DOUBLE_QUOTED_STRING($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
8294	0	112	if defined $main::RD_TRACE
8302	0	712	if defined $main::RD_TRACE
8314	0	712	if defined $main::RD_TRACE
8327	112	712	unless $_matched
8332	0	112	if defined $main::RD_TRACE
8345	0	112	if defined $main::RD_TRACE
8352	111	1	unless (defined($_tok = SINGLE_QUOTED_STRING($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
8355	0	111	if defined $main::RD_TRACE
8363	0	1	if defined $main::RD_TRACE
8375	0	1	if defined $main::RD_TRACE
8388	111	713	unless $_matched
8393	0	111	if defined $main::RD_TRACE
8406	0	111	if defined $main::RD_TRACE
8413	111	0	unless (defined($_tok = BARESTRING($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
8416	0	111	if defined $main::RD_TRACE
8424	0	0	if defined $main::RD_TRACE
8436	0	0	if defined $main::RD_TRACE
8449	111	713	unless $_matched
8451	111	713	unless ($_matched or defined $score)
8457	0	111	if defined $main::RD_TRACE
8464	0	713	if (not defined $return and defined $score)
8466	0	0	if defined $main::RD_TRACE
8473	713	0	unless defined $return
8474	0	713	if (defined $main::RD_TRACE)
8499	0	1	if defined $main::RD_TRACE
8518	1	0	defined $_[4] ? :
8520	1	0	$#arg & 1 ? :
8535	0	1	if defined $main::RD_TRACE
8548	0	1	if defined $main::RD_TRACE
8556	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)/)
8558	0	0	if defined $lastsep
8560	0	0	if defined $main::RD_TRACE
8568	0	1	if defined $main::RD_TRACE
8575	0	1	if defined $main::RD_TRACE
8582	0	1	unless (defined($_tok = envelopestruct($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
8585	0	0	if defined $main::RD_TRACE
8593	0	1	if defined $main::RD_TRACE
8605	0	1	if defined $main::RD_TRACE
8613	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(?:.*\))/)
8615	0	0	if defined $lastsep
8617	0	0	if defined $main::RD_TRACE
8625	0	1	if defined $main::RD_TRACE
8632	0	1	if defined $main::RD_TRACE
8639	0	1	$_noactions ? :
8640	0	1	unless (defined $_tok)
8642	0	0	if defined $main::RD_TRACE
8646	0	1	if defined $main::RD_TRACE
8654	0	1	if defined $main::RD_TRACE
8667	0	1	unless $_matched
8669	0	1	unless ($_matched or defined $score)
8675	0	0	if defined $main::RD_TRACE
8682	0	1	if (not defined $return and defined $score)
8684	0	0	if defined $main::RD_TRACE
8691	0	1	unless defined $return
8692	0	1	if (defined $main::RD_TRACE)
8717	0	24	if defined $main::RD_TRACE
8736	24	0	defined $_[4] ? :
8738	24	0	$#arg & 1 ? :
8753	0	24	if defined $main::RD_TRACE
8766	0	24	if defined $main::RD_TRACE
8773	0	24	unless (defined($_tok = ADDRESSES($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
8776	0	0	if defined $main::RD_TRACE
8784	0	24	if defined $main::RD_TRACE
8796	0	24	if defined $main::RD_TRACE
8809	0	24	unless $_matched
8811	0	24	unless ($_matched or defined $score)
8817	0	0	if defined $main::RD_TRACE
8824	0	24	if (not defined $return and defined $score)
8826	0	0	if defined $main::RD_TRACE
8833	24	0	unless defined $return
8834	0	24	if (defined $main::RD_TRACE)
8859	0	60	if defined $main::RD_TRACE
8878	60	0	defined $_[4] ? :
8880	60	0	$#arg & 1 ? :
8895	0	60	if defined $main::RD_TRACE
8908	0	60	if defined $main::RD_TRACE
8915	60	0	unless (defined($_tok = NIL($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
8918	0	60	if defined $main::RD_TRACE
8926	0	0	if defined $main::RD_TRACE
8938	0	0	if defined $main::RD_TRACE
8951	60	0	unless $_matched
8956	0	60	if defined $main::RD_TRACE
8969	0	60	if defined $main::RD_TRACE
8976	2	58	unless (defined($_tok = NUMBER($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
8979	0	2	if defined $main::RD_TRACE
8987	0	58	if defined $main::RD_TRACE
8999	0	58	if defined $main::RD_TRACE
9012	2	58	unless $_matched
9014	2	58	unless ($_matched or defined $score)
9020	0	2	if defined $main::RD_TRACE
9027	0	58	if (not defined $return and defined $score)
9029	0	0	if defined $main::RD_TRACE
9036	58	0	unless defined $return
9037	0	58	if (defined $main::RD_TRACE)
9062	0	53	if defined $main::RD_TRACE
9081	53	0	defined $_[4] ? :
9083	53	0	$#arg & 1 ? :
9098	0	53	if defined $main::RD_TRACE
9111	0	53	if defined $main::RD_TRACE
9118	32	21	unless (defined($_tok = rfc822message($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
9121	0	32	if defined $main::RD_TRACE
9129	0	21	if defined $main::RD_TRACE
9143	0	21	if defined $main::RD_TRACE
9149	21	0	if (defined $_tok) { }
9151	0	21	if defined $main::RD_TRACE
9158	0	0	if defined $main::RD_TRACE
9163	0	21	unless defined $_tok
9167	0	21	if defined $main::RD_TRACE
9174	0	21	unless (defined($_tok = bodyparms($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
9177	0	0	if defined $main::RD_TRACE
9185	0	21	if defined $main::RD_TRACE
9197	0	21	if defined $main::RD_TRACE
9204	0	21	unless (defined($_tok = bodyid($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
9207	0	0	if defined $main::RD_TRACE
9215	0	21	if defined $main::RD_TRACE
9227	0	21	if defined $main::RD_TRACE
9234	0	21	unless (defined($_tok = bodydesc($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
9237	0	0	if defined $main::RD_TRACE
9245	0	21	if defined $main::RD_TRACE
9257	0	21	if defined $main::RD_TRACE
9264	0	21	unless (defined($_tok = bodyenc($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
9267	0	0	if defined $main::RD_TRACE
9275	0	21	if defined $main::RD_TRACE
9287	0	21	if defined $main::RD_TRACE
9294	0	21	unless (defined($_tok = bodysize($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
9297	0	0	if defined $main::RD_TRACE
9305	0	21	if defined $main::RD_TRACE
9317	0	21	if defined $main::RD_TRACE
9324	0	21	unless (defined($_tok = $thisparser->_parserepeat($text, \&Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::envelopestruct, 0, 1, $_noactions, $expectation, sub { \@arg; } , undef)))
9326	0	0	if defined $main::RD_TRACE
9333	0	21	if defined $main::RD_TRACE
9345	0	21	if defined $main::RD_TRACE
9352	0	21	unless (defined($_tok = $thisparser->_parserepeat($text, \&Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::bodystructure, 0, 1, $_noactions, $expectation, sub { \@arg; } , undef)))
9354	0	0	if defined $main::RD_TRACE
9361	0	21	if defined $main::RD_TRACE
9373	0	21	if defined $main::RD_TRACE
9380	0	21	unless (defined($_tok = $thisparser->_parserepeat($text, \&Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::textlines, 0, 1, $_noactions, $expectation, sub { \@arg; } , undef)))
9382	0	0	if defined $main::RD_TRACE
9389	0	21	if defined $main::RD_TRACE
9401	0	21	if defined $main::RD_TRACE
9408	0	21	unless (defined($_tok = $thisparser->_parserepeat($text, \&Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::bodyMD5, 0, 1, $_noactions, $expectation, sub { \@arg; } , undef)))
9410	0	0	if defined $main::RD_TRACE
9417	0	21	if defined $main::RD_TRACE
9429	0	21	if defined $main::RD_TRACE
9436	0	21	unless (defined($_tok = $thisparser->_parserepeat($text, \&Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::bodydisp, 0, 1, $_noactions, $expectation, sub { \@arg; } , undef)))
9438	0	0	if defined $main::RD_TRACE
9445	0	21	if defined $main::RD_TRACE
9457	0	21	if defined $main::RD_TRACE
9464	0	21	unless (defined($_tok = $thisparser->_parserepeat($text, \&Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::bodylang, 0, 1, $_noactions, $expectation, sub { \@arg; } , undef)))
9466	0	0	if defined $main::RD_TRACE
9473	0	21	if defined $main::RD_TRACE
9485	0	21	if defined $main::RD_TRACE
9492	0	21	unless (defined($_tok = $thisparser->_parserepeat($text, \&Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::bodyextra, 0, 1, $_noactions, $expectation, sub { \@arg; } , undef)))
9494	0	0	if defined $main::RD_TRACE
9501	0	21	if defined $main::RD_TRACE
9513	0	21	if defined $main::RD_TRACE
9520	0	21	$_noactions ? :
9536	0	21	unless (defined $_tok)
9538	0	0	if defined $main::RD_TRACE
9542	0	21	if defined $main::RD_TRACE
9550	0	21	if defined $main::RD_TRACE
9563	32	21	unless $_matched
9565	32	21	unless ($_matched or defined $score)
9571	0	32	if defined $main::RD_TRACE
9578	0	21	if (not defined $return and defined $score)
9580	0	0	if defined $main::RD_TRACE
9587	0	21	unless defined $return
9588	0	21	if (defined $main::RD_TRACE)
9613	0	24	if defined $main::RD_TRACE
9632	24	0	defined $_[4] ? :
9634	24	0	$#arg & 1 ? :
9649	0	24	if defined $main::RD_TRACE
9662	0	24	if defined $main::RD_TRACE
9669	0	24	unless (defined($_tok = ADDRESSES($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
9672	0	0	if defined $main::RD_TRACE
9680	0	24	if defined $main::RD_TRACE
9692	0	24	if defined $main::RD_TRACE
9705	0	24	unless $_matched
9707	0	24	unless ($_matched or defined $score)
9713	0	0	if defined $main::RD_TRACE
9720	0	24	if (not defined $return and defined $score)
9722	0	0	if defined $main::RD_TRACE
9729	24	0	unless defined $return
9730	0	24	if (defined $main::RD_TRACE)
9755	0	112	if defined $main::RD_TRACE
9774	112	0	defined $_[4] ? :
9776	112	0	$#arg & 1 ? :
9791	0	112	if defined $main::RD_TRACE
9804	0	112	if defined $main::RD_TRACE
9813	18	94	if $lastsep = $1
	111	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 })
9818	111	0	if defined $lastsep
9821	0	111	if defined $main::RD_TRACE
9826	0	1	if defined $main::RD_TRACE
9833	0	1	if defined $main::RD_TRACE
9841	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(?:(?:\\['\\]|[^'])*)/)
9843	0	0	if defined $lastsep
9845	0	0	if defined $main::RD_TRACE
9853	0	1	if defined $main::RD_TRACE
9860	0	1	if defined $main::RD_TRACE
9869	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 })
9874	0	0	if defined $lastsep
9877	0	0	if defined $main::RD_TRACE
9882	0	1	if defined $main::RD_TRACE
9889	0	1	if defined $main::RD_TRACE
9896	0	1	$_noactions ? :
9897	0	1	unless (defined $_tok)
9899	0	0	if defined $main::RD_TRACE
9903	0	1	if defined $main::RD_TRACE
9911	0	1	if defined $main::RD_TRACE
9924	111	1	unless $_matched
9926	111	1	unless ($_matched or defined $score)
9932	0	111	if defined $main::RD_TRACE
9939	0	1	if (not defined $return and defined $score)
9941	0	0	if defined $main::RD_TRACE
9948	0	1	unless defined $return
9949	0	1	if (defined $main::RD_TRACE)
9974	0	21	if defined $main::RD_TRACE
9993	21	0	defined $_[4] ? :
9995	21	0	$#arg & 1 ? :
10010	0	21	if defined $main::RD_TRACE
10023	0	21	if defined $main::RD_TRACE
10032	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 })
10037	1	0	if defined $lastsep
10040	0	1	if defined $main::RD_TRACE
10045	0	20	if defined $main::RD_TRACE
10052	0	20	if defined $main::RD_TRACE
10059	0	20	unless (defined($_tok = $thisparser->_parserepeat($text, \&Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::part, 1, 100000000, $_noactions, $expectation, sub { \@arg; } , undef)))
10061	0	0	if defined $main::RD_TRACE
10068	0	20	if defined $main::RD_TRACE
10080	0	20	if defined $main::RD_TRACE
10089	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 })
10094	0	0	if defined $lastsep
10097	0	0	if defined $main::RD_TRACE
10102	0	20	if defined $main::RD_TRACE
10109	0	20	if defined $main::RD_TRACE
10116	0	20	$_noactions ? :
10117	0	20	unless (defined $_tok)
10119	0	0	if defined $main::RD_TRACE
10123	0	20	if defined $main::RD_TRACE
10131	0	20	if defined $main::RD_TRACE
10144	1	20	unless $_matched
10146	1	20	unless ($_matched or defined $score)
10152	0	1	if defined $main::RD_TRACE
10159	0	20	if (not defined $return and defined $score)
10161	0	0	if defined $main::RD_TRACE
10168	0	20	unless defined $return
10169	0	20	if (defined $main::RD_TRACE)
10194	0	58	if defined $main::RD_TRACE
10213	58	0	defined $_[4] ? :
10215	58	0	$#arg & 1 ? :
10230	0	58	if defined $main::RD_TRACE
10243	0	58	if defined $main::RD_TRACE
10252	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 })
10257	57	0	if defined $lastsep
10260	0	57	if defined $main::RD_TRACE
10265	0	1	if defined $main::RD_TRACE
10272	0	1	if defined $main::RD_TRACE
10279	0	1	unless (defined($_tok = $thisparser->_parserepeat($text, \&Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::STRING, 1, 100000000, $_noactions, $expectation, sub { \@arg; } , undef)))
10281	0	0	if defined $main::RD_TRACE
10288	0	1	if defined $main::RD_TRACE
10300	0	1	if defined $main::RD_TRACE
10309	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 })
10314	0	0	if defined $lastsep
10317	0	0	if defined $main::RD_TRACE
10322	0	1	if defined $main::RD_TRACE
10329	0	1	if defined $main::RD_TRACE
10336	0	1	$_noactions ? :
10337	0	1	unless (defined $_tok)
10339	0	0	if defined $main::RD_TRACE
10343	0	1	if defined $main::RD_TRACE
10351	0	1	if defined $main::RD_TRACE
10364	57	1	unless $_matched
10366	57	1	unless ($_matched or defined $score)
10372	0	57	if defined $main::RD_TRACE
10379	0	1	if (not defined $return and defined $score)
10381	0	0	if defined $main::RD_TRACE
10388	0	1	unless defined $return
10389	0	1	if (defined $main::RD_TRACE)
10414	0	111	if defined $main::RD_TRACE
10433	111	0	defined $_[4] ? :
10435	111	0	$#arg & 1 ? :
10450	0	111	if defined $main::RD_TRACE
10463	0	111	if defined $main::RD_TRACE
10471	17	94	if $lastsep = $1
	111	0	if ($text =~ s/\A($Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::skip)/'' if $lastsep = $1;/e and $text =~ /\A(?:^[)('"])/)
10475	0	111	if defined $main::RD_TRACE
10483	0	0	if defined $main::RD_TRACE
10490	0	0	if defined $main::RD_TRACE
10498	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)+)/)
10500	0	0	if defined $lastsep
10502	0	0	if defined $main::RD_TRACE
10510	0	0	if defined $main::RD_TRACE
10517	0	0	if defined $main::RD_TRACE
10524	0	0	$_noactions ? :
10525	0	0	unless (defined $_tok)
10527	0	0	if defined $main::RD_TRACE
10531	0	0	if defined $main::RD_TRACE
10539	0	0	if defined $main::RD_TRACE
10552	111	0	unless $_matched
10554	111	0	unless ($_matched or defined $score)
10560	0	111	if defined $main::RD_TRACE
10567	0	0	if (not defined $return and defined $score)
10569	0	0	if defined $main::RD_TRACE
10576	0	0	unless defined $return
10577	0	0	if (defined $main::RD_TRACE)
10602	0	102	if defined $main::RD_TRACE
10621	102	0	defined $_[4] ? :
10623	102	0	$#arg & 1 ? :
10638	0	102	if defined $main::RD_TRACE
10651	0	102	if defined $main::RD_TRACE
10658	79	23	unless (defined($_tok = NIL($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
10661	0	79	if defined $main::RD_TRACE
10669	0	23	if defined $main::RD_TRACE
10681	0	23	if defined $main::RD_TRACE
10694	79	23	unless $_matched
10699	0	79	if defined $main::RD_TRACE
10712	0	79	if defined $main::RD_TRACE
10719	3	76	unless (defined($_tok = KVPAIRS($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
10722	0	3	if defined $main::RD_TRACE
10730	0	76	if defined $main::RD_TRACE
10742	0	76	if defined $main::RD_TRACE
10755	3	99	unless $_matched
10757	3	99	unless ($_matched or defined $score)
10763	0	3	if defined $main::RD_TRACE
10770	0	99	if (not defined $return and defined $score)
10772	0	0	if defined $main::RD_TRACE
10779	99	0	unless defined $return
10780	0	99	if (defined $main::RD_TRACE)
10805	0	824	if defined $main::RD_TRACE
10824	824	0	defined $_[4] ? :
10826	824	0	$#arg & 1 ? :
10841	0	824	if defined $main::RD_TRACE
10854	0	824	if defined $main::RD_TRACE
10863	502	322	if $lastsep = $1
	112	712	unless ($text =~ s/\A($Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::skip)/'' if $lastsep = $1;/e and $text =~ /\A\"/)
10865	112	0	if defined $lastsep
10868	0	112	if defined $main::RD_TRACE
10875	0	712	if defined $main::RD_TRACE
10882	0	712	if defined $main::RD_TRACE
10890	0	712	if $lastsep = $1
	0	712	unless ($text =~ s/\A($Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::skip)/'' if $lastsep = $1;/e and $text =~ /\A(?:(?:\\["\\]|[^"])*)/)
10892	0	0	if defined $lastsep
10894	0	0	if defined $main::RD_TRACE
10902	0	712	if defined $main::RD_TRACE
10909	0	712	if defined $main::RD_TRACE
10918	0	712	if $lastsep = $1
	0	712	unless ($text =~ s/\A($Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::skip)/'' if $lastsep = $1;/e and $text =~ /\A\"/)
10920	0	0	if defined $lastsep
10923	0	0	if defined $main::RD_TRACE
10930	0	712	if defined $main::RD_TRACE
10937	0	712	if defined $main::RD_TRACE
10944	0	712	$_noactions ? :
10945	0	712	unless (defined $_tok)
10947	0	0	if defined $main::RD_TRACE
10951	0	712	if defined $main::RD_TRACE
10959	0	712	if defined $main::RD_TRACE
10972	112	712	unless $_matched
10974	112	712	unless ($_matched or defined $score)
10980	0	112	if defined $main::RD_TRACE
10987	0	712	if (not defined $return and defined $score)
10989	0	0	if defined $main::RD_TRACE
10996	0	712	unless defined $return
10997	0	712	if (defined $main::RD_TRACE)
11022	0	94	if defined $main::RD_TRACE
11041	94	0	defined $_[4] ? :
11043	94	0	$#arg & 1 ? :
11058	0	94	if defined $main::RD_TRACE
11071	0	94	if defined $main::RD_TRACE
11078	0	94	unless (defined($_tok = NIL($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
11081	0	0	if defined $main::RD_TRACE
11089	0	94	if defined $main::RD_TRACE
11101	0	94	if defined $main::RD_TRACE
11114	0	94	unless $_matched
11119	0	0	if defined $main::RD_TRACE
11132	0	0	if defined $main::RD_TRACE
11139	0	0	unless (defined($_tok = STRING($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
11142	0	0	if defined $main::RD_TRACE
11150	0	0	if defined $main::RD_TRACE
11162	0	0	if defined $main::RD_TRACE
11175	0	94	unless $_matched
11177	0	94	unless ($_matched or defined $score)
11183	0	0	if defined $main::RD_TRACE
11190	0	94	if (not defined $return and defined $score)
11192	0	0	if defined $main::RD_TRACE
11199	94	0	unless defined $return
11200	0	94	if (defined $main::RD_TRACE)
11225	0	32	if defined $main::RD_TRACE
11244	32	0	defined $_[4] ? :
11246	32	0	$#arg & 1 ? :
11261	0	32	if defined $main::RD_TRACE
11274	0	32	if defined $main::RD_TRACE
11281	20	12	unless (defined($_tok = STRING($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
11284	0	20	if defined $main::RD_TRACE
11292	0	12	if defined $main::RD_TRACE
11304	0	12	if defined $main::RD_TRACE
11317	20	12	unless $_matched
11319	20	12	unless ($_matched or defined $score)
11325	0	20	if defined $main::RD_TRACE
11332	0	12	if (not defined $return and defined $score)
11334	0	0	if defined $main::RD_TRACE
11341	12	0	unless defined $return
11342	0	12	if (defined $main::RD_TRACE)
11367	0	24	if defined $main::RD_TRACE
11386	24	0	defined $_[4] ? :
11388	24	0	$#arg & 1 ? :
11403	0	24	if defined $main::RD_TRACE
11416	0	24	if defined $main::RD_TRACE
11423	24	0	unless (defined($_tok = NIL($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
11426	0	24	if defined $main::RD_TRACE
11434	0	0	if defined $main::RD_TRACE
11446	0	0	if defined $main::RD_TRACE
11459	24	0	unless $_matched
11464	0	24	if defined $main::RD_TRACE
11477	0	24	if defined $main::RD_TRACE
11484	0	24	unless (defined($_tok = STRING($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
11487	0	0	if defined $main::RD_TRACE
11495	0	24	if defined $main::RD_TRACE
11507	0	24	if defined $main::RD_TRACE
11520	0	24	unless $_matched
11522	0	24	unless ($_matched or defined $score)
11528	0	0	if defined $main::RD_TRACE
11535	0	24	if (not defined $return and defined $score)
11537	0	0	if defined $main::RD_TRACE
11544	24	0	unless defined $return
11545	0	24	if (defined $main::RD_TRACE)
11570	0	129	if defined $main::RD_TRACE
11589	129	0	defined $_[4] ? :
11591	129	0	$#arg & 1 ? :
11606	0	129	if defined $main::RD_TRACE
11619	0	129	if defined $main::RD_TRACE
11626	117	12	unless (defined($_tok = NIL($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
11629	0	117	if defined $main::RD_TRACE
11637	0	12	if defined $main::RD_TRACE
11649	0	12	if defined $main::RD_TRACE
11662	117	12	unless $_matched
11667	0	117	if defined $main::RD_TRACE
11680	0	117	if defined $main::RD_TRACE
11687	117	0	unless (defined($_tok = NUMBER($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
11690	0	117	if defined $main::RD_TRACE
11698	0	0	if defined $main::RD_TRACE
11710	0	0	if defined $main::RD_TRACE
11723	117	12	unless $_matched
11728	0	117	if defined $main::RD_TRACE
11741	0	117	if defined $main::RD_TRACE
11748	16	101	unless (defined($_tok = STRING($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
11751	0	16	if defined $main::RD_TRACE
11759	0	101	if defined $main::RD_TRACE
11771	0	101	if defined $main::RD_TRACE
11784	16	113	unless $_matched
11789	0	16	if defined $main::RD_TRACE
11802	0	16	if defined $main::RD_TRACE
11809	0	16	unless (defined($_tok = KVPAIRS($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
11812	0	0	if defined $main::RD_TRACE
11820	0	16	if defined $main::RD_TRACE
11832	0	16	if defined $main::RD_TRACE
11845	0	129	unless $_matched
11847	0	129	unless ($_matched or defined $score)
11853	0	0	if defined $main::RD_TRACE
11860	0	129	if (not defined $return and defined $score)
11862	0	0	if defined $main::RD_TRACE
11869	129	0	unless defined $return
11870	0	129	if (defined $main::RD_TRACE)
11895	0	94	if defined $main::RD_TRACE
11914	94	0	defined $_[4] ? :
11916	94	0	$#arg & 1 ? :
11931	0	94	if defined $main::RD_TRACE
11944	0	94	if defined $main::RD_TRACE
11951	70	24	unless (defined($_tok = NIL($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
11954	0	70	if defined $main::RD_TRACE
11962	0	24	if defined $main::RD_TRACE
11974	0	24	if defined $main::RD_TRACE
11987	70	24	unless $_matched
11992	0	70	if defined $main::RD_TRACE
12005	0	70	if defined $main::RD_TRACE
12012	0	70	unless (defined($_tok = STRING($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
12015	0	0	if defined $main::RD_TRACE
12023	0	70	if defined $main::RD_TRACE
12035	0	70	if defined $main::RD_TRACE
12048	0	94	unless $_matched
12050	0	94	unless ($_matched or defined $score)
12056	0	0	if defined $main::RD_TRACE
12063	0	94	if (not defined $return and defined $score)
12065	0	0	if defined $main::RD_TRACE
12072	94	0	unless defined $return
12073	0	94	if (defined $main::RD_TRACE)
12098	0	24	if defined $main::RD_TRACE
12117	24	0	defined $_[4] ? :
12119	24	0	$#arg & 1 ? :
12134	0	24	if defined $main::RD_TRACE
12147	0	24	if defined $main::RD_TRACE
12154	0	24	unless (defined($_tok = ADDRESSES($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
12157	0	0	if defined $main::RD_TRACE
12165	0	24	if defined $main::RD_TRACE
12177	0	24	if defined $main::RD_TRACE
12190	0	24	unless $_matched
12192	0	24	unless ($_matched or defined $score)
12198	0	0	if defined $main::RD_TRACE
12205	0	24	if (not defined $return and defined $score)
12207	0	0	if defined $main::RD_TRACE
12214	24	0	unless defined $return
12215	0	24	if (defined $main::RD_TRACE)
12240	0	249	if defined $main::RD_TRACE
12259	249	0	defined $_[4] ? :
12261	249	0	$#arg & 1 ? :
12276	0	249	if defined $main::RD_TRACE
12289	0	249	if defined $main::RD_TRACE
12297	246	3	if $lastsep = $1
	119	130	unless ($text =~ s/\A($Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::skip)/'' if $lastsep = $1;/e and $text =~ /\A(?:^(\d+))/)
12299	119	0	if defined $lastsep
12301	0	119	if defined $main::RD_TRACE
12309	0	130	if defined $main::RD_TRACE
12316	0	130	if defined $main::RD_TRACE
12323	0	130	$_noactions ? :
12324	0	130	unless (defined $_tok)
12326	0	0	if defined $main::RD_TRACE
12330	0	130	if defined $main::RD_TRACE
12338	0	130	if defined $main::RD_TRACE
12351	119	130	unless $_matched
12353	119	130	unless ($_matched or defined $score)
12359	0	119	if defined $main::RD_TRACE
12366	0	130	if (not defined $return and defined $score)
12368	0	0	if defined $main::RD_TRACE
12375	0	130	unless defined $return
12376	0	130	if (defined $main::RD_TRACE)
12401	0	92	if defined $main::RD_TRACE
12420	92	0	defined $_[4] ? :
12422	92	0	$#arg & 1 ? :
12437	0	92	if defined $main::RD_TRACE
12450	0	92	if defined $main::RD_TRACE
12457	53	39	unless (defined($_tok = TEXT($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
12460	0	53	if defined $main::RD_TRACE
12468	0	39	if defined $main::RD_TRACE
12482	0	39	if defined $main::RD_TRACE
12488	39	0	if (defined $_tok) { }
12490	0	39	if defined $main::RD_TRACE
12497	0	0	if defined $main::RD_TRACE
12502	0	39	unless defined $_tok
12506	0	39	if defined $main::RD_TRACE
12513	0	39	unless (defined($_tok = basicfields($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
12516	0	0	if defined $main::RD_TRACE
12524	0	39	if defined $main::RD_TRACE
12536	0	39	if defined $main::RD_TRACE
12543	0	39	unless (defined($_tok = $thisparser->_parserepeat($text, \&Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::textlines, 0, 1, $_noactions, $expectation, sub { \@arg; } , undef)))
12545	0	0	if defined $main::RD_TRACE
12552	0	39	if defined $main::RD_TRACE
12564	0	39	if defined $main::RD_TRACE
12571	0	39	unless (defined($_tok = $thisparser->_parserepeat($text, \&Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::bodyMD5, 0, 1, $_noactions, $expectation, sub { \@arg; } , undef)))
12573	0	0	if defined $main::RD_TRACE
12580	0	39	if defined $main::RD_TRACE
12592	0	39	if defined $main::RD_TRACE
12599	0	39	unless (defined($_tok = $thisparser->_parserepeat($text, \&Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::bodydisp, 0, 1, $_noactions, $expectation, sub { \@arg; } , undef)))
12601	0	0	if defined $main::RD_TRACE
12608	0	39	if defined $main::RD_TRACE
12620	0	39	if defined $main::RD_TRACE
12627	0	39	unless (defined($_tok = $thisparser->_parserepeat($text, \&Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::bodylang, 0, 1, $_noactions, $expectation, sub { \@arg; } , undef)))
12629	0	0	if defined $main::RD_TRACE
12636	0	39	if defined $main::RD_TRACE
12648	0	39	if defined $main::RD_TRACE
12655	0	39	unless (defined($_tok = $thisparser->_parserepeat($text, \&Parse::RecDescent::Mail::IMAPClient::BodyStructure::Parse::bodyextra, 0, 1, $_noactions, $expectation, sub { \@arg; } , undef)))
12657	0	0	if defined $main::RD_TRACE
12664	0	39	if defined $main::RD_TRACE
12676	0	39	if defined $main::RD_TRACE
12683	0	39	$_noactions ? :
12690	0	39	unless (defined $_tok)
12692	0	0	if defined $main::RD_TRACE
12696	0	39	if defined $main::RD_TRACE
12704	0	39	if defined $main::RD_TRACE
12717	53	39	unless $_matched
12719	53	39	unless ($_matched or defined $score)
12725	0	53	if defined $main::RD_TRACE
12732	0	39	if (not defined $return and defined $score)
12734	0	0	if defined $main::RD_TRACE
12741	0	39	unless defined $return
12742	0	39	if (defined $main::RD_TRACE)
12767	0	98	if defined $main::RD_TRACE
12786	98	0	defined $_[4] ? :
12788	98	0	$#arg & 1 ? :
12803	0	98	if defined $main::RD_TRACE
12816	0	98	if defined $main::RD_TRACE
12824	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)
12826	94	0	if defined $lastsep
12828	0	94	if defined $main::RD_TRACE
12836	0	4	if defined $main::RD_TRACE
12843	0	4	if defined $main::RD_TRACE
12850	0	4	$_noactions ? :
12851	0	4	unless (defined $_tok)
12853	0	0	if defined $main::RD_TRACE
12857	0	4	if defined $main::RD_TRACE
12865	0	4	if defined $main::RD_TRACE
12878	94	4	unless $_matched
12880	94	4	unless ($_matched or defined $score)
12886	0	94	if defined $main::RD_TRACE
12893	0	4	if (not defined $return and defined $score)
12895	0	0	if defined $main::RD_TRACE
12902	0	4	unless defined $return
12903	0	4	if (defined $main::RD_TRACE)
12928	0	24	if defined $main::RD_TRACE
12947	24	0	defined $_[4] ? :
12949	24	0	$#arg & 1 ? :
12964	0	24	if defined $main::RD_TRACE
12977	0	24	if defined $main::RD_TRACE
12984	24	0	unless (defined($_tok = NIL($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
12987	0	24	if defined $main::RD_TRACE
12995	0	0	if defined $main::RD_TRACE
13007	0	0	if defined $main::RD_TRACE
13020	24	0	unless $_matched
13025	0	24	if defined $main::RD_TRACE
13038	0	24	if defined $main::RD_TRACE
13045	0	24	unless (defined($_tok = STRING($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
13048	0	0	if defined $main::RD_TRACE
13056	0	24	if defined $main::RD_TRACE
13068	0	24	if defined $main::RD_TRACE
13081	0	24	unless $_matched
13083	0	24	unless ($_matched or defined $score)
13089	0	0	if defined $main::RD_TRACE
13096	0	24	if (not defined $return and defined $score)
13098	0	0	if defined $main::RD_TRACE
13105	24	0	unless defined $return
13106	0	24	if (defined $main::RD_TRACE)
13131	0	102	if defined $main::RD_TRACE
13150	102	0	defined $_[4] ? :
13152	102	0	$#arg & 1 ? :
13167	0	102	if defined $main::RD_TRACE
13180	0	102	if defined $main::RD_TRACE
13187	47	55	unless (defined($_tok = NIL($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
13190	0	47	if defined $main::RD_TRACE
13198	0	55	if defined $main::RD_TRACE
13210	0	55	if defined $main::RD_TRACE
13223	47	55	unless $_matched
13228	0	47	if defined $main::RD_TRACE
13241	0	47	if defined $main::RD_TRACE
13248	47	0	unless (defined($_tok = STRING($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
13251	0	47	if defined $main::RD_TRACE
13259	0	0	if defined $main::RD_TRACE
13271	0	0	if defined $main::RD_TRACE
13284	47	55	unless $_matched
13289	0	47	if defined $main::RD_TRACE
13302	0	47	if defined $main::RD_TRACE
13309	47	0	unless (defined($_tok = STRINGS($thisparser, $text, $repeating, $_noactions, sub { \@arg; } , undef)))
13312	0	47	if defined $main::RD_TRACE
13320	0	0	if defined $main::RD_TRACE
13332	0	0	if defined $main::RD_TRACE
13345	47	55	unless $_matched
13347	47	55	unless ($_matched or defined $score)
13353	0	47	if defined $main::RD_TRACE
13360	0	55	if (not defined $return and defined $score)
13362	0	0	if defined $main::RD_TRACE
13369	55	0	unless defined $return
13370	0	55	if (defined $main::RD_TRACE)