#!/bin/csh

setenv TZ CST6CDT
echo Content-type: text/html
echo ""

echo "<HR>"
echo "<H1>PLoP USA '96 Registration Profile</H1>"
echo "<H3><I>"
echo `date`
echo "</I><P></H3>"

cd /home/guest/plop
cd regs
cd usa 
echo "<H2>Registrations:  <B>" `ls | wc -l` "</B></H2>"
echo "<CODE>"
echo "Authors:  <B>" `grep 'Author = Yes' * | wc -l` "</B>"
echo "<BR>"
echo "Non-Authors:  <B>" `grep 'Author = No' * | wc -l` "</B>"
echo "<BR><BR>"
echo "Males:  <B>" `grep 'Sex = Male' * | wc -l` "</B>"
echo "<BR>"
echo "Females:  <B>" `grep 'Sex = Female' * | wc -l` "</B>"
echo "<BR><BR>"
echo "Argentina:  <B>" `grep -i 'Country = Argentina' * | wc -l` "</B><BR>"
echo "Australia:  <B>" `grep -i 'Country = Australia' * | wc -l` "</B><BR>"
#echo "Austria:  <B>" `grep -i 'Country = Austria' * | wc -l` "</B><BR>"
echo "Canada:  <B>" `grep -i 'Country = Canada' * | wc -l` "</B><BR>"
echo "Cyprus:  <B>" `grep -i 'Country = Cyprus' * | wc -l` "</B><BR>"
#echo "Finland:  <B>" `grep -i 'Country = Finland' * | wc -l` "</B><BR>"
echo "France:  <B>" `grep -i 'Country = France' * | wc -l` "</B><BR>"
echo "Germany:  <B>" `grep -i 'Country = Germany' * | wc -l` "</B><BR>"
#echo "Greece:  <B>" `grep -i 'Country = Greece' * | wc -l` "</B><BR>"
echo "India:  <B>" `grep -i 'Country = India' * | wc -l` "</B><BR>"
echo "Israel:  <B>" `grep -i 'Country = Israel' * | wc -l` "</B><BR>"
echo "Italy:  <B>" `grep -i 'Country = Italy' * | wc -l` "</B><BR>"
echo "Mexico:  <B>" `grep -i 'Country = Mexico' * | wc -l` "</B><BR>"
echo "Netherlands:  <B>" `grep -i 'Country = Netherlands' * | wc -l` "</B><BR>"
echo "New Zealand:  <B>" `grep -i 'Country = New Zealand' * | wc -l` "</B><BR>"
echo "Portugal:  <B>" `grep -i 'Country = Portugal' * | wc -l` "</B><BR>"
echo "Sweden:  <B>" `grep -i 'Country = Sweden' * | wc -l` "</B><BR>"
echo "Switzerland:  <B>" `grep -i 'Country = Switzerland' * | wc -l` "</B><BR>"
echo "UK:  <B>" `grep -i 'Country = UK' * | wc -l` "</B><BR>"
echo "USA:  <B>" `grep -i 'Country = USA' * | wc -l` "</B><BR>"
echo "<BR>"
echo "Students:  <B>" `grep 'Student = Yes' * | wc -l` "</B><BR>"
echo "Non-Students:  <B>" `grep 'Student = No' * | wc -l` "</B><BR>"
echo "<BR>"
echo "Local:  <B>" `grep 'Local = Yes' * | wc -l` "</B><BR>"
echo "Non-Local:  <B>" `grep 'Local = No' * | wc -l` "</B><BR>"
echo "<BR>"
echo "Hillside:  <B>" `grep 'Hillside = Yes' * | wc -l` "</B><BR>"
echo "Non-Hillside:  <B>" `grep 'Hillside = No' * | wc -l` "</B><BR>"
echo "<BR>"
echo "Shepherd:  <B>" `grep 'Shepherd = Yes' * | wc -l` "</B><BR>"
echo "Non-Shepherd:  <B>" `grep 'Shepherd = No' * | wc -l` "</B><BR>"
echo "<BR>"
echo "</CODE>"
echo "<P><HR>" 

echo "<H1>PLoP '96 Attendees</H1>"
echo "<P>"
echo "<I><B>Bold Italicized</B></I> links indicate WWW pages, others are EMail addresses:<P>"
set noglob
echo "<B>*</B> indicates an <B>AUTHOR</B>."
unset noglob
echo "<PRE><MENU>"

foreach  f (*)
set noglob
set work = (`grep "Last =" $f`)
set last = "$work[3-]"
set work = (`grep "First =" $f`)
set first = "$work[3-]"
set name = "$last, $first"
set work = (`grep "Organization =" $f`)
set org = "$work[3-]"
set work = (`grep "Author =" $f`)
if ($work[3] == "Yes") then
set auth = "<B>*</B>"
else
set auth = " "
endif
set work = (`grep "EMail =" $f`)
set email = "$work[3]"
set work = (`grep "WWW =" $f`)
if ($#work > 2) then
set www = "$work[3]"
echo "<LI><B><I><A HREF=$www>$name</A></B></I> $org $auth"
else
echo "<LI><A HREF=mailto:$email>$name</A> $org $auth" 
endif
unset noglob
#echo "<LI><A HREF=http://www.cpl.uiuc.edu/cgi-bin/usa-record?$f>$name</A> $org" 
end

echo "</MENU></PRE>"
echo "<P><HR>"


