everywhere (try packStr) >>> normalizeTag >>> outerMost eitherToMaybe >>> flatten >>>  outerMost mapsum >>> many (once replaceDefaultTags)