xml 使用mvt：// wip剥离html

Posted 2021-05-17

<mvt:assign name="l.stripped_descrip" value="l.settings:product:descrip" />
		<mvt:if expr="('<' IN l.stripped_descrip) AND ('>' IN l.stripped_descrip)">
			<mvt:assign name="l.tag_out" value="''" />
			<mvt:assign name="l.pos" value="1" />
			<mvt:while expr="l.pos LE len(l.stripped_descrip)">
				<mvt:if expr="substring(l.stripped_descrip,l.pos,1) EQ '<'">
					<mvt:while expr="l.pos LE len(l.stripped_descrip)">
						<mvt:if expr="substring(l.stripped_descrip,l.pos,1) EQ '>'">
							<mvt:whilestop />
						</mvt:if>
						<mvt:assign name="l.pos" value="l.pos + 1" />
					</mvt:while>
				<mvt:else>
					<mvt:assign name="l.tag_out" value="l.tag_out $ substring(l.stripped_descrip,l.pos,1)" />
				</mvt:if>
				<mvt:assign name="l.pos" value="l.pos + 1" />
			</mvt:while>
			<mvt:assign name="l.stripped_descrip" value="l.tag_out"/>
			<mvt:if expr="('<' IN l.stripped_descrip) OR ('>' IN l.stripped_descrip)">
				<mvt:assign name="l.stripped_descrip" value="glosub(l.stripped_descrip,'<','')" />
				<mvt:assign name="l.stripped_descrip" value="glosub(l.stripped_descrip,'>','')" />
			</mvt:if>
		<mvt:else>
			<mvt:if expr="('<' IN l.stripped_descrip) OR ('>' IN l.stripped_descrip)">
				<mvt:assign name="l.stripped_descrip" value="glosub(l.stripped_descrip,'<','')" />
				<mvt:assign name="l.stripped_descrip" value="glosub(l.stripped_descrip,'>','')" />
			</mvt:if>
		</mvt:if>
		<mvt:assign name="l.stripped_descrip" value="ltrim(l.stripped_descrip )" />
		<mvt:assign name="l.stripped_descrip" value="rtrim( l.stripped_descrip )" />
		<mvt:assign name="l.stripped_descrip" value="glosub(l.stripped_descrip, asciichar(10), '')" />
		<mvt:assign name="l.stripped_descrip" value="glosub(l.stripped_descrip, asciichar(13), '')" />
		<mvt:assign name="l.stripped_descrip" value="glosub(l.stripped_descrip, asciichar(09), '')" />
		<mvt:assign name="l.stripped_descrip" value="glosub(l.stripped_descrip, asciichar(32) $ asciichar(32) $ asciichar(32), ' ')" />
		<mvt:assign name="l.stripped_descrip" value="glosub(l.stripped_descrip, asciichar(32) $ asciichar(32), ' ')" />
		<mvt:assign name="l.settings:stripped_descrip" value="substring_var(l.stripped_descrip, 1, 160)" />
		<meta name="description" content="&mvt:stripped_descrip;" />