#!/usr/bin/perl
use CGI;

print "<ul>";

opendir(DIR,"../public_html/ERS");
@files = readdir(DIR);

foreach $file (@files) {
  print "$file\n";
  }