From bc70de7b3302d5a81515b901cae376b8b51d2004 Mon Sep 17 00:00:00 2001
From: "Arnold D. Robbins" <arnold@skeeve.com>
Date: Fri, 16 Jul 2010 13:09:56 +0300
Subject: Move to gawk-3.1.0.

---
 awklib/eg/network/testserv.awk | 12 ++++++++++++
 1 file changed, 12 insertions(+)
 create mode 100644 awklib/eg/network/testserv.awk

(limited to 'awklib/eg/network/testserv.awk')

diff --git a/awklib/eg/network/testserv.awk b/awklib/eg/network/testserv.awk
new file mode 100644
index 00000000..812bfe6a
--- /dev/null
+++ b/awklib/eg/network/testserv.awk
@@ -0,0 +1,12 @@
+BEGIN {
+  CGI_setup("GET",
+  "http://www.gnu.org/cgi-bin/foo?p1=stuff&p2=stuff%26junk" \
+       "&percent=a %25 sign",
+  "1.0")
+  for (i in MENU)
+      printf "MENU[\"%s\"] = %s\n", i, MENU[i]
+  for (i in PARAM)
+      printf "PARAM[\"%s\"] = %s\n", i, PARAM[i]
+  for (i in GETARG)
+      printf "GETARG[\"%s\"] = %s\n", i, GETARG[i]
+}
-- 
cgit v1.2.3