RCEM Presentations and Posters

Listed below, in chronological order, are the oral presentations for RCEM 2005. In addition to oral presentations, poster presentations that were submitted by authors are also included. To update your presentation, please email Nils Oberg at noberg@uiuc.edu.

Presentations that are grayed out are ones for which no presentation is available.

Gary Parker's RCEM banquet presentation is also available here.

#!/usr/bin/perl -w use strict; print "Content-type: text/html\n\n"; my %PresDirs; my @dirs = sort glob("presentations/files/*"); foreach my $dir (@dirs) { (my $name = $dir) =~ s%^.*[\\\/]([^\\\/]+)$%$1%; if ($name =~ m%^([A-Z][A-Z])\-(\d\d)\-(\d\d\d\d)%) { $PresDirs{"$1-$2-$3"} = $name; } elsif ($name =~ m%^([A-Z][A-Z])\-P\-(P\d+)%) { $PresDirs{"$1-P-$2"} = $name; } } my @files = sort glob("presentations/data/*.txt"); foreach my $file (@files) { open SCHED, "< $file"; chomp(my $date = ); print <$date HTML my $curSession = ""; my $pCount = 0; while (my $line = ) { $line =~ s%^\s*(.*?)\s*$%$1%; next if $line =~ m%^\s*$%; my @parts = split(m/\t/, $line); # Remark if ($parts[0] eq '*') { my $color = (($pCount) % 2 ? " bgcolor=\"#ddf0ff\"" : ""); $pCount++; my $p1 = $parts[1]; my $ucp2 = ucfirst $parts[2]; print < HTML } # Session elsif ($parts[0] =~ m%^SESSION%) { $pCount = 0; my ($junk, $sessionId, $other) = split(m/\s+/, $parts[0], 3); $curSession = $sessionId; #my $moderator = ($parts[1] eq '*' ? "" : " $parts[1]"); print < HTML } # Presentation else { my $ptype = ($parts[2] =~ m%^invited% ? "(Invited) " : ""); (my $tm = $parts[1]) =~ s%\:%%g; $tm = (length $tm < 4 ? "0$tm" : $tm); $parts[0] = (length $parts[0] < 2 ? "0$parts[0]" : $parts[0]); my $idStr = $curSession . "-" . $tm; $idStr = $curSession . "-" . $parts[0] if ($parts[2] eq "poster"); my $color = (($pCount) % 2 ? " bgcolor=\"#ddf0ff\"" : ""); $pCount++; my $linkStr = ""; my $textColorS = ""; my $textColorE = ""; if (exists $PresDirs{$idStr}) { $linkStr = qq($parts[4]); } else { $linkStr = $parts[4]; $textColorS = qq(); $textColorE = qq(); } print < HTML } } print qq(
$p1 $ucp2
Session $sessionId $other
$textColorS$parts[1]$textColorE $textColorS$ptype$parts[3]$textColorE $textColorS$linkStr$textColorE
\n); close SCHED; }