Select Code to Download

var data_run=[ ["label a",1],["label b",2],["label_c",99]];

 
use strict; use warnings; 
use DBI; 
...
# then you join them and assign them 
my $orun=join(',',@iarray_run); 
print "var data_run=[$orun];\n";

var data_run=[["adice_short",192],["ncsim_short",84],["ncsim_long",78]
+,["adice_long",39],["normal",30],["other",34]];