Select Code to Download

foreach my $No (@Nos){
     
        push(@String, $Chains{$chain}{$No}) ;
...
        print "@Nos\n";
       
    }