my $template = HTML::Template->new( filename => 'temp.tmpl' );
@languages =();
foreach (sort keys %fm) {
        if ((! $fm{$_}{'cksum'}) && (! $fm{$_}{'byte'})) {
                @minilanguage=();
                @minilanguages = (
                {
                        fmfile_name => $_ ,
                        fmfileowner => $fm{$_}{'owner'}
                },
                );
                push @language, @minilanguages;
                
                delete $fm{$_};
        }
}
print "@languages\n";
$template->param( FMPermissionIssue => @languages );


print $template->output();