<$list filter="[regexp:text[Charter Filed:]]-[<currentTiddler>]" >
<$list filter="[all[current]get[text]splitbefore[Charter Filed:]]" variable="prefix">
<$list filter="[all[current]get[text]removeprefix<prefix>]" >
<$list filter="[all[current]split[-]nth[1]]" variable=year>
<$list filter="[all[current]split[-]nth[2]]" variable=month>
<$list filter="[all[current]split[-]nth[3]]" variable=daze>
<$list filter="[<daze>split[]nth[1]]" variable=d1>
<$list filter="[<daze>split[]nth[2]]" variable=d2>
<<year>>-<<month>>-<<d1>><<d2>>
</$list>
</$list>
</$list>
</$list>
</$list>
</$list>
</$list>
</$list>