Generate web page statistics.

git-svn-id: svn://10.0.0.236/trunk@20551 18797224-902f-48f8-a5cc-f745e15eee43

mozilla/webtools/webstats/utils.pl

@@ -0,0 +1,49 @@
+# -*- Mode: perl; indent-tabs-mode: nil -*-
+#
+# The contents of this file are subject to the Mozilla Public License
+# Version 1.0 (the "License"); you may not use this file except in
+# compliance with the License. You may obtain a copy of the License at
+# http://www.mozilla.org/MPL/
+# 
+# Software distributed under the License is distributed on an "AS IS"
+# basis, WITHOUT WARRANTY OF ANY KIND, either express or implied. See the
+# License for the specific language governing rights and limitations
+# under the License.
+# 
+# The Original Code is the Web Page Statistics Generator.
+# 
+# The Initial Developer of the Original Code is Netscape Communications
+# Corporation. Portions created by Netscape are Copyright (C) 1998
+# Netscape Communications Corporation. All Rights Reserved.
+# 
+# Contributor(s): Terry Weissman <terry@mozilla.org>
+
+sub Query {
+    my ($qstr) = @_;
+    if ($F::debug) {
+        print $qstr . "<BR>\n";
+    }
+    return $main::db->query($qstr) || die "$qstr: $Mysql::db_errstr";
+}
+
+
+
+sub SqlQuote {
+    ($_) = (@_);
+    s/'/''/g;
+    s/\\/\\\\/g;
+    return "'$_'";
+}
+
+1;
+
+
+
+# Trim whitespace from front and back.
+
+sub trim {
+    ($_) = (@_);
+    s/^\s*//g;
+    s/\s*$//g;
+    return $_;
+}