sub include_javascript does not remove closing tag "</SCRIPT>".
For example:
<SCRIPT SRC="URI" ..></SCRIPT>
is replaces by:
<SCRIPT SRC="URI" ..>
[code]
</script></SCRIPT>
The line:
$gabarit=~s/<script([^>]*)src\s*=\s*"?([^\"
]*js)"?([^>]*)>/$self->pattern_js($2,$1,$3,$root)/iegmx;
should be something like:
$gabarit=~s/<script([^>]*)src\s*=\s*"?([^\"
]*js)"?([^>]*)>(\s*<\/script>)?/$self->pattern_js($2,$1,$3,$root)/iegmx;