#!/bin/sed -f 1i\ /./{ s# $## s# # #g s#&#\&#g s#<#\<#g s#>#\>#g s#å#\å#g s#ä#\ä#g s#ö#\ö#g s#Å#\Å#g s#Ä#\Ä#g s#Ö#\Ö#g H $b emit d } /./!{ :emit x 1,/./{ /./{ h s#^.*$# & #p s#.*## x } } /^[ \n]*$/d /^\n *---* *$/c\
/^\n *___* *$/c\
/^\n\([A-Za-np-z][^\n]*\)\n *[-*o.] .*/{ h s##

\1

#p s#.*## x s#^\n[A-Za-np-z][^\n]*## } /^\n[A-Za-np-z]/,/^\n *[-*o.] /{ /^\n *[-*o.] /i\ b eiul } $a\ s#\n *[-*o.] \([^\n]*\(\n *[^ .o*-][^\n]*\)*\)#
  • \1
  • \ #g } : eiul /^\n\([A-Za-z][^\n]*\)\n *[1-9][0-9]*[.):] .*/{ h s##

    \1

    #p s#.*## x s#^\n[A-Za-z][^\n]*## } /^\n[A-Za-z]/,/^\n *[1-9][0-9]*[.):] /{ /^\n *[1-9][0-9]*[.):] /i\
      } /^\n *[1-9][0-9]*[.):] /,/^\n[A-Za-z]/{ /^\n[A-Za-z]/{ i\
    b eiol } $a\ s#\n *[1-9][0-9]*[.):] \([^\n]*\(\n *[^ 0-9][^\n]*\)*\)#
  • \1
  • \ #g } : eiol /^\n[A-Za-z][^\n]*\n[A-Za-z]/,/^\(\n[A-Za-z][^\n]*\)*\n /{ /^\(\n[A-Za-z][^\n]*\)*\n /i\
    } /^\(\n[A-Za-z][^\n]*\)*\n /,/^\n[A-Za-z][^\n]*\n[A-Za-z]/{ /^\n[A-Za-z][^\n]*\n[A-Za-z]/{ i\
    b eidl } $a\ s#\n\([A-Za-z][^\n]*\(\n[A-Za-z][^\n]*\)*\)#
    \1
    #g s#\n\( [^\n<]*\(\n [^\n<]*\)*\)#
    \1
    #g } : eidl /^\n\([^\n]*: *\)\n>[^\n]*$/{ h s##

    \1

    #p s#.*## x s#^\n[^\n]*: *\n#\ # } /^\(\(\n>[^\n]*\)*\)$/{ s##
    \1
    # s#\n> *\n>#\
    #g s#\n>#\ #g } s#^\n\([^\na-z]*\)\(\n[- =~"]*\)*$#

    \1

    # s#^\n\([^\n]*\)\(\n[- =~"]*\)*$#

    \1

    # s#^\n\(.*\)$#

    \1

    # s#\([ \n("'-]\)/\([^/]*\)/\([ \n,.;:?!)"'-]\)#\1\2\3#g s#\([ \n("'-]\)_\([^_]*\)_\([ \n,.;:?!)"'-]\)#\1\2\3#g s#\([ \n("'-]\)\*\([^*]*\)\*\([ \n,.;:?!)"'-]\)#\1\2\3#g s#http://\([A-Za-z0-9][A-Za-z0-9]*[^ \n()A-Za-z0-9]~*\)*[A-Za-z0-9][A-Za-z0-9]*/*#&#g } $a\