#!/bin/sh echo 'Content-type: text/html DEMO Conference Digest

DEMO Conference Digest

By conference date (current)  By conference date (all) 
By submission deadline (current)  By submission deadline (all) 

Click here to add a conference to this list

' case x$QUERY_STRING in *ALL*) all=1;; *) all=0;; esac case x$QUERY_STRING in *SUB*) sub=1;; *) sub=0;; esac file=conferences.list case $sub in 1) : /usr/local/bin/perl subdate.pl file=conferences.sub ;; esac case $all in 0) # to eliminate past conferences... # we get todays' date today=`date +%Y%m%d` # then count how many of them are not expired count=`sort $file | cut -c1-8 | awk ' {if ($1 >= today) count++} END {print count}' today=$today count=0 ` #echo count=$count # then we get the tail of the sorted list sort $file | cut -c9- | tail -$count ;; 1) sort $file | cut -c9- ;; esac echo '
Conference
Date 		Submission
Deadline 		Acronym Conference
Name 		Where Comments

Click here to add a conference to this list

' echo '

Back to DEMO private pages'