Alternative Job-index

[Dion Rasmussen]

Hello,

Wouldn't it be straight and awesome to make an alternative index like
this in perl:

open INDEX, ">/path/to/www/index.html" or die "Can't open index $!";
print INDEX "<H1>Job Index</H1>\n";
$/=\123;
while (</path/tp/submissions/*>) {
open SUB, "<$_" or die "Can't open submission $!";
my $subsub = <SUB>;
print INDEX "<P>$subsub...</P>\n\n";
close SUB;
}
close INDEX;

Could be run with cron or as CGI.