"</head><body><pre>Index of $path_info_html</pre><hr><pre>\n");
$gzf->zmore(join("\n", @entries));
my $out = $gzf->zflush("</pre><hr></body></html>\n");
"</head><body><pre>Index of $path_info_html</pre><hr><pre>\n");
$gzf->zmore(join("\n", @entries));
my $out = $gzf->zflush("</pre><hr></body></html>\n");