diff --git a/qsgen2 b/qsgen2 index 8da3846..4f05a03 100755 --- a/qsgen2 +++ b/qsgen2 @@ -803,9 +803,8 @@ function _html() { if ${debug}; then _msg debug "_html: Converting QStags in content"; fi - # Convert QStags to HTML using Perl - local html_content=$(perl -pe ' - next if /#link|#image|#ytvideo/; + # Convert QStags to HTML using Perl, excluding specific patterns + local html_content=$(echo "$content" | perl -0777 -pe ' s/(?\n/gi; s/(?/gi; s/(?\n/gi; @@ -818,51 +817,50 @@ function _html() { s/(?/gi; s/(?/gi; s/(?/gi; - s/(?/gi; + s/(?/gi; s/(?/gi; s/(?\n/gi; s/(?/gi; s/(?\n/gi; - s/(?/gi; - s/(?\n/gi; - s(?/gi; - s/(?\n/gi; - s(?/gi; - s(?\n/gi; - s(?/gi; - s(?/gi; - s(?/gi; - s(?\n/gi; - s(?/gi; - s(?\n/gi; - s(?/gi; - s(?\n/gi; - s(?/gi; - s(?\n/gi; - s(?/gi; - s(?\n/gi; - s(?/gi; - s(?\n/gi; - s(?/gi; - s(?\n/gi; - s(?/gi; - s(?\n/gi; - s(?/gi; - s(?\n/gi; - s(?/gi; - s(?\n/gi; - s(?/gi; - s(?\n/gi; - s/(?/gi; + s/(?\n/gi; + s/(?/gi; + s/(?\n/gi; + s/(?/gi; + s/(?\n/gi; + s/(?/gi; + s/(?/gi; + s/(?/gi; + s/(?\n/gi; + s/(?/gi; + s/(?\n/gi; + s/(?/gi; + s/(?\n/gi; + s/(?/gi; + s/(?\n/gi; + s/(?/gi; + s/(?\n/gi; + s/(?/gi; + s/(?\n/gi; + s/(?/gi; + s/(?\n/gi; + s/(?/gi; + s/(?\n/gi; + s/(?/gi; + s/(?\n/gi; + s/(?/gi; + s/(?\n/gi; + s/(?/gi; + s/(?\n/gi; + s/(?