# KEHOME/knowledge/ApplicationInternet/compare.htm # 1999/6/30 # new syntax Sep/29/2002 #==============================# # compare Internet Directories # #==============================# set kcase=LOWER # fold all names to lower case do read od excite.ho, infoseek.ho, yahoo.ho done do read od myexcite.ho done # merge the top level categories Yahoo is Excite, InfoSeek Directory is Channel My Page is Channel # merge different variants of the same name games is Games, Games@ Autos is Automotive music is Music great movies is Movies football is Football computer is computers # separate units which were lumped into a single category dirhi is begin hierarchy People & Chat / People / Chat Kids & Family / Kids / Family Business & Economy / Business / Economy Business & Investing / Business / Investing Careers & Education / Careers / Education Computers & Internet / Computers / Internet News & Media / News / Media Recreation & Sports / Recreation / Sports Society & Culture / Society / Culture end hierarchy dirhi set hfocus = Channel do check od genus, loop done #Channel ise**1 ? #Channel ise**2 ?