You don't need that /g, in this case, and you really don't need that /e.

use CGI qw/:standard/;

open F, "< $flatfile_db" or die "read $flatfile_db: $!";
my $List = ul(li([<F>]));
$header =~ s/<LIST>/$List/i;
[download]