Select Code to Download

sample values of @gl
CD9
...
SOX2
POU5F1
KLF4

sample of @hfr_genes
LYPLA1
...
LYPLA1
LYPLA1
LYPLA1

my code:
do
...
}
until ($index==(scalar(@hfr_genes)));