$inline =~ s/[\N{U+2019}\N{U+201D}]/<\/quote>/g;
$inline =~ s/[\N{U+2014}]/<ch.endash\/>/g;
$inline =~ s/[\N{U+2014}]/<ch.emdash\/>/g;
$inline =~ s/[\N{U+2019}\N{U+201D}]/<\/quote>/g;
$inline =~ s/[\N{U+2014}]/<ch.endash\/>/g;
$inline =~ s/[\N{U+2014}]/<ch.emdash\/>/g;