bind pubm - "!countdown*" countdown

proc countdown {nick host hand chan text} {
$duration($calc($ctime(january 1 2005 00:00) - $ctime))
putserv "PRIVMSG $chan :There is only $result left until year 2005!!"
}
