#!/usr/bin/perl -s $title = "Centralized Conferencing (XCON) - IETF 61 Agenda"; if ($t) { print "Content-Type: text/plain\n\n"; print "$title\n\n"; print "CHAIRS: Alan Johnston \n". " Adam Roach \n\n"; } else { print "Content-Type: text/html\n". "\n". "$title\n". "\n". "

$title

\n". "\n". "
\n".
  "\n".
  "CHAIRS: Alan Johnston <alan.johnston@mci.com>\n".
  "        Adam Roach <adam@nostrum.com>\n".
  "\n".
  "
\n"; } foreach $entry () { chop; ($time, $name, $topic, $drafts, $presentations) = split(';', $entry); if ($time && !$topic) { if ($t) { print "\n$name======================================\n\n"; } else { if ($tod) { print "

\n"; } print "

$name

\n". "
\n". "\n". " \n". " \n". " \n". " \n". " \n". " \n"; } $tod = $time; next; } @drafts = split(',', $drafts); @presentations = split(',', $presentations); $start = $tod; $h = int($tod / 100); $m = $tod % 100; $m += $time; $h += int($m / 60); $m %= 60; $tod = $h*100 + $m; if ($t) { $name =~ s/
//i; printf ("%4.4d - %4.4d $topic\n", $start, $tod); print " $name ($time minutes)\n"; foreach $draft(@drafts) { print " $draft\n"; } print "\n"; } else { foreach $draft (@drafts) { if (-e "../../drafts/$draft") { $draft =~ s/(.*)/$1<\/a>/; } else { if ($f) { system ("cd ../../drafts; wget http://www.ietf.org/internet-drafts/$draft"); } $draft =~ s/(.*)/$1<\/a>*<\/sup>/; $nonlocal++; } } foreach $presentation (@presentations) { $presentation =~ s/([^.]*)\.(.*)/$2<\/a>/; } print "\n"; printf (" \n", $start, $tod); print " \n"; print " \n"; print " \n"; print " \n"; print " \n"; print "\n"; } } print "
TimeLengthDiscussion LeaderTopicDraftSlides
%4.4d - %4.4d$time minutes$name$topic"; print join ("
",@drafts); print "  		"; print join (", ",@presentations); print "  
" unless ($t); # time (in minutes);presenter;topic;drafts,drafts;slides,slides __DATA__ 1930;MONDAY, November 8, 2004, 1930-2200 5;Chairs;Agenda Bash;; 10;Chairs;Status Update;draft-ietf-xcon-conference-scenarios-02.txt,draft-ietf-xcon-cpcp-reqs-04.txt,draft-ietf-xcon-floor-control-req-02.txt; 35;Mary Barnes;Conferencing Framework Document;draft-barnes-xcon-framework-00.txt; 50;Orit Levin;CCCP and The Data Model;draft-levin-xcon-cccp-00.txt,draft-ietf-sipping-conference-package-06.txt; 50;Hisham Khartabil;Conference Policy;draft-ietf-xcon-cpcp-01.txt,draft-ietf-xcon-conference-policy-privileges-01.txt,draft-ietf-xcon-cpcp-xcap-03.txt; 0900;FRIDAY, November 12, 2004, 0900-1130 40;Gonzalo Camarillo;Floor Control;draft-ietf-xcon-bfcp-02.txt; 60;Chris Boulton;Media Policy;draft-jennings-xcon-media-control-01.txt,draft-boulton-xcon-media-template-00.txt,draft-rosen-xcon-conf-sidebars-01.txt; 50;Chairs;Additional Discussion, if necessary;;