Select Code to Download

my @array_1 = ("\$Id_run_query=1", "\$name_run_query=xyz", "db_query_r
+un_query=select * from meter where metetid=\$Id and metername=\$name"
+);
my $query;
...
}
print "===>$query\n";