Perl Script to “Compile” the Data

#!/usr/bin/perl

# make-MP-index-of-proposed-topics.pl

use strict;

use CGI qw/:standard/;

open(INFILE, "<MP-topic-proposal-data-sorted.txt") ||

die("Could not open the file MP-topic-proposal-data-sorted.txt.\n");

print<<"EOT";

<html><head><title>CSE 341 MP Topic Proposal Index</title>

</head><body>

<h1>CSE 341 MP Topic Proposal Index</h1>

EOT

print "<table><tr><td>Student username</td><td>Proposal Page</td><td>Partner</td><td>Certainty</td><td>When</td></tr>\n";

my $projectname;

my $uncertain;

my $partner;

my $proposal_url;

my $student_username;

my $date;