remove CGI where possible

use mod_perl request with fallback to CGI::Simple where possible.

lib/calcms/markup.pm

@@ -7,6 +7,7 @@ use Text::WikiCreole();
 use HTML::Parse();
 use HTML::FormatText();
 use Encode();
+use HTML::Entities();
 
 use log();
 
@@ -498,5 +499,10 @@ sub encode_xml_element_text {
 	return $text;
 }
 
+sub escapeHtml{
+    my $s=shift;
+    return HTML::Entities::encode_entities($s,q{&<>"'});
+}
+
 #do not delete last line!
 1;