#!/usr/bin/perl -w

use HTML::Template;

# OPEN TEMPLATE
my $tmpl = HTML::Template->new(filename => "index.tmpl");

# FIND FILES
my @files = `ls -1 --color=no /home/Natura/htdocs/download/TGZ/JSPELL`;
@files = map {chomp; "<li><a href=\"/download/TGZ/JSPELL/$_\">$_</a></li>"} @files;
$tmpl->param(SOFTWARE => join("", @files));

#...

# PRINT THE HTML FILE
open OUT, ">index.html" or die;
print OUT $tmpl->output;
close OUT;