Select Code to Download

push @structure , [];
for (my $i=0;$i<= $#ex; $i++) {
 push @{ @structure->[$j]}, $ex[$i]; 
}