Select Code to Download

my $template = $theme->{ThemeDir}."index.html";

my %themes = {1 => '/dir1/', 
              2 => '/dir2/',
...
my $theme = param(theme);
my $filename = "$themes{$theme}.index.html";
open (FILE, $filename);