imapsync/W/Mail-IMAPClient-3.32/lib/Mail/IMAPClient/Thread.grammar
Nick Bebout 1e03db551f 1.508
2012-09-11 20:50:53 -05:00

18 lines
303 B
Text

# Atoms:
NUMBER: /\d+/
# Rules:
threadmember: NUMBER { $return = $item{NUMBER} ; } |
thread { $return = $item{thread} ; }
thread: "(" threadmember(s) ")"
{
$return = $item{'threadmember(s)'}||undef;
}
# Start:
start: /^\* THREAD /i thread(s?) {
$return=$item{'thread(s?)'}||undef;
}