Move under www to ease rsync

www/eps/hpr2824/hpr2824_awk15_ex4.awk

@@ -0,0 +1,17 @@
+#!/usr/bin/awk -f
+
+# Downloadable example 4 for GNU Awk Part 15
+
+BEGIN {
+    if (ARGC != 2 ) {
+        print "Needs a file name argument" > "/dev/stderr"
+        exit
+    }
+
+    data = ARGV[1]
+
+    while ( (getline line < data) > 0 )
+        print line
+    close(data)
+}
+