Select Code to Download

for(0..$size-1){
   $tstr=$tstr."?,";
...
}
chop($tstr);
chop($tv);

my $tstr = join ',', ("?") x @table;
my $tv = join ',', @table;