__strip_html_tags__.m File Reference

Functions
	if (length(start)==length(stop)) text
else	warning ("help: invalid HTML data -- raw HTML source follows...")
	disp (html_text)
else	groups (end+1, 1:2)
if(groups(1, 1)==1) keep(1 endif	if (sum(groups(end,:))-1==length(text)) keep(groups(end
	keep (start+2:stop)
Variables
	function [text, status]
	stop = find (html_text == ">")
for	n
endfor	text = strip_superfluous_endlines (text)
	status = 0
	dels = diff (els)
	groups = [els(1), 1]
for	k
endif endfor	keep = true (size (text))
if(groups(1, 1)==1) keep(1 endif endif	idx = find (groups (:, 2) >= 3)

---

Function Documentation

disp

(

html_text

)

else groups	(	end+	1,
		1:2
	)

if (groups (1, 1) == 1) keep (1 endif if

(

sum(groups(end,:))-

1 = = length (text)

)

if

(

length(start)

= =length(stop)

)

keep

(

start+2:stop

)

else warning

(

"help: invalid HTML data -- raw HTML source follows..."

)

---

Variable Documentation

dels = diff (els)

function[text, status]

Initial value:

 __strip_html_tags__ (html_text)
  start = find (html_text == "<")

groups = [els(1), 1]

if (groups (1, 1) == 1) keep (1 endif endif idx = find (groups (:, 2) >= 3)

for k

Initial value:

 1:length (dels)
    if (dels (k) == 1)
      groups (end, 2) ++

endif endfor keep = true (size (text))

for n

Initial value:

 length(start):-1:1
      text (start (n):stop (n)) = []

endif status = 0

stop = find (html_text == ">")

endfor text = strip_superfluous_endlines (text)