Select Code to Download

Subject checkbox yes
Data checkbox yes
....etc

my $d=scalar(@b)/3 # @b is the array with the content of the file
for (my$i=0; $i<=$#ddts; $i++){
...
print "<table><tr><td>$ddts[$i]</td>$new</tr></table>";
}
}