BEGIN {
  system("rm -f goo.log; echo > goo.log; chmod a+rw goo.log")
  adj[++nj] = "horrible"; p[nj] = "-"
  adj[++nj] = "awful"; p[nj] = "-"
  adj[++nj] = "harmful"; p[nj] = "-"
  adj[++nj] = "terrible"; p[nj] = "-"
  adj[++nj] = "lousy"; p[nj] = "-"
  adj[++nj] = "crap"; p[nj] = "-"
  adj[++nj] = "lame"; p[nj] = "-"
  adj[++nj] = "evil"; p[nj] = "-"
  adj[++nj] = "stupid"; p[nj] = "-"
  adj[++nj] = "shit"; p[nj] = "-"
  adj[++nj] = "junk"; p[nj] = "-"
  adj[++nj] = "weak"; p[nj] = "-"
  adj[++nj] = "trash"; p[nj] = "-"
  adj[++nj] = "garbage"; p[nj] = "-"
  adj[++nj] = "poor"; p[nj] = "-"
  adj[++nj] = "badly%20designed"; p[nj] = "-"
  adj[++nj] = "poorly%20designed"; p[nj] = "-"
  adj[++nj] = "a%20disaster"; p[nj] = "-"
  adj[++nj] = "a%20mess"; p[nj] = "-"
  adj[++nj] = "foolish"; p[nj] = "-"
  adj[++nj] = "crazy"; p[nj] = "-"
  adj[++nj] = "trash"; p[nj] = "-"
  adj[++nj] = "hated"; p[nj] = "-"
  adj[++nj] = "hateful"; p[nj] = "-"
  adj[++nj] = "wonderful"; p[nj] = ""
  adj[++nj] = "awesome"; p[nj] = ""
  adj[++nj] = "cool"; p[nj] = ""
  adj[++nj] = "powerful"; p[nj] = ""
  adj[++nj] = "nice"; p[nj] = ""
  adj[++nj] = "excellent"; p[nj] = ""
  adj[++nj] = "clever"; p[nj] = ""
  adj[++nj] = "intelligent"; p[nj] = ""
  adj[++nj] = "quick"; p[nj] = ""
  adj[++nj] = "fantastic"; p[nj] = ""
  adj[++nj] = "terrific"; p[nj] = ""
  adj[++nj] = "amazing"; p[nj] = ""
  adj[++nj] = "perfect"; p[nj] = ""
  adj[++nj] = "lovely"; p[nj] = ""
  adj[++nj] = "easy"; p[nj] = ""
  adj[++nj] = "sweet"; p[nj] = ""
  adj[++nj] = "loved"; p[nj] = ""
  adj[++nj] = "fun"; p[nj] = ""
  adj[++nj] = "great"; p[nj] = ""
  adj[++nj] = "well%20designed"; p[nj] = ""

  l[++nl] = "awk"
  l[++nl] = "perl"
  l[++nl] = "java"
  l[++nl] = "python"
  l[++nl] = "scheme"
  l[++nl] = "elisp"
  l[++nl] = "common%20lisp"
  l[++nl] = "common-lisp"
  l[++nl] = "lisp"
  l[++nl] = "fortran"
  l[++nl] = "c"
  l[++nl] = "php"
  l[++nl] = "javascript"
  l[++nl] = "javabeans"
  l[++nl] = "matlab"
  l[++nl] = "gawk"
  l[++nl] = "mawk"
  l[++nl] = "nawk"
  l[++nl] = "c%20sharp"
  l[++nl] = "cold%20fusion"
  l[++nl] = "c-sharp"
  l[++nl] = "c%23"
  l[++nl] = "c%2B%2B"
  l[++nl] = "asp"
  l[++nl] = "basic"
  l[++nl] = "ml"
  l[++nl] = "cobol"
  l[++nl] = "ruby"
  l[++nl] = "html"
  l[++nl] = "xml"
  l[++nl] = "sql"
  l[++nl] = "tcl"
  l[++nl] = "forth"
  l[++nl] = "pascal"
  l[++nl] = "modula"
  l[++nl] = "algol"
  l[++nl] = "babbage"
  l[++nl] = "xemacs"
  l[++nl] = "postscript"
  l[++nl] = "tex"
  l[++nl] = "latex"
  l[++nl] = "asp%20net"
  l[++nl] = "ada"
  l[++nl] = "algol68"
  l[++nl] = "corba"
  l[++nl] = "prolog"
  l[++nl] = "openGL"
  l[++nl] = "apl"
  l[++nl] = "mathematica"
  l[++nl] = "show%20and%20tell"

  for (i=1; i<=nl; i++) {
    for (j=1; j<=nj; j++) {
      com = "lynx -dump 'http://www.cs.wustl.edu/~loui/langtrends/goo.cgi?"l[i]"%20is%20"adj[j]"' "
      print com
      close("goo.log")
      printf p[j] >> "goo.log"
      system(com)
    }

    com = "lynx -dump 'http://www.cs.wustl.edu/~loui/langtrends/goo1.cgi?i%20love%20"l[i]"' "
    print com
    close("goo.log")
    printf "" >> "goo.log"
    system(com)

    com = "lynx -dump 'http://www.cs.wustl.edu/~loui/langtrends/goo1.cgi?"l[i]"%20rocks' "
    print com
    close("goo.log")
    printf "" >> "goo.log"
    system(com)

    com = "lynx -dump 'http://www.cs.wustl.edu/~loui/langtrends/goo1.cgi?"l[i]"%20considered%20harmful' "
    print com
    close("goo.log")
    printf "-" >> "goo.log"
    system(com)

    com = "lynx -dump 'http://www.cs.wustl.edu/~loui/langtrends/goo.cgi?"l[i]"%20sucks' "
    print com
    close("goo.log")
    printf "-" >> "goo.log"
    system(com)

    com = "lynx -dump 'http://www.cs.wustl.edu/~loui/langtrends/goo1.cgi?i%20hate%20"l[i]"' "
    print com
    close("goo.log")
    printf "-" >> "goo.log"
    system(com)

  }

  system("gawk -f sum.awk < goo.log | sort -nr")
}