#!/bin/ksh
# Days remaining in George W. Bush's Presidency 

let secs=$(date +'%s')-18000
# seconds since 1 Jan 70 00:00:00 UTC adjusted to EST

let days=0

while (( $secs > 0 )); do
  let secs=$secs-86400
  let days=$days+1
done

# let days=12804-$days  # 12804 = 20 Jan 2005
let days=14265-$days  # 14265 = 20 Jan 2009

print 'Content-type: text/html'
print ''

print $days