#!/bin/bash

sed '
  s/>/>\n/g
  s/</\n</g
' \
  | sed -n '
    /^<!--.*>$/ d
    /^<!--/,/-->$/ d
    /^<script[ >]/,\,^</script>$, d
    /^<body\(>$\|\s\)/,\,^</body>$, p
  ' \
  | sed '
    s/<[^<>]*>//g
  '