Index: change-www
===================================================================
--- change-www
+++ change-www
@@ -0,0 +1,24 @@
+#!/bin/sh
+
+traverse() 
+{
+	ls "$1" | while read i
+	do
+		if [ -f "$1/$i/pkg-descr" ]; then
+			WWW=`awk '$1 ~ /^WWW:/ {print $2}' $1/$i/pkg-descr`
+			if [ ! -z "$WWW" ]; then
+				sed -i '' '/^COMMENT/a \ 
+					WWW=		'$WWW'\
+					' $1/$i/Makefile
+				sed -i '' '/WWW/d' $1/$i/pkg-descr
+				sed -i '' -e :a -e '/^\n*$/{$d;N;ba' -e '}' $1/$i/pkg-descr
+			fi
+		fi
+	done
+}
+
+for category in accessibility arabic archivers astro audio benchmarks biology cad chinese comms converters databases deskutils devel dns editors emulators finance french ftp games german graphics hebrew hungarian irc japanese java korean lang mail math misc multimedia net net-im net-mgmt net-p2p news palm polish ports-mgmt portuguese print russian science security shells sysutils textproc ukrainian vietnamese www x11 x11-clocks x11-drivers x11-fm x11-fonts x11-servers x11-themes x11-toolkits x11-wm
+#for category in print
+do
+	traverse "$category" 0
+done