AWK: Generar Lista en HTML

<code> BEGIN { <br/> # Transforma texto de entrada en lista HTML<br/> # Los items en el texto fuente se identifican por uno de “-” o “+” y estan separados por líneas vacias.<br/> # LType (List Type) definida por el usuario: “u” unordered, “o” ordered (“u” por defecto). Ejemplo: <br/> # awk -v LType=”u” -f dolist.awk archivo_de_origen.txt<br/> &nbsp;&nbsp;RS=”"<br/> &nbsp;&nbsp;if (!LType) LType=”u” # Valor por defecto de LType<br/> &nbsp;&nbsp;BeginItem=”<li>” ; EndItem = “</li>” # Etiquetas de los items de salida<br/> &nbsp;&nbsp;# lista no ordenada<br/> &nbsp;&nbsp;if (LType == “u”) {ItemMark = “^\-[ \t]*” ; BeginList=”<ul>” ; EndList=”</ul>”} <br/> &nbsp;&nbsp;# lista ordenada<br/> &nbsp;&nbsp;&nbsp;&nbsp;else if (LType == “o”) {ItemMark = “^\+[ \t]*” ; BeginList=”<ol>” ; EndList=”</ol>”} <br/> &nbsp;&nbsp;print(BeginList) <br/> }<br/> <br/> { if ($0 ~ ItemMark) {sub(ItemMark,”") ; print(BeginItem $0 EndItem)} }<br/> <br/> END { print(EndList) }<br/> </code>

Advertisement