Select Code to Download

if ($element[4] =~ /^
   (?=.*?\Q$Homosapiens\E)
   (?=.*?\Q$choromosome\E)
/x)

if ($element[4] =~ /\Q$Homosapiens\E/ &&
    $element[4] =~ /\Q$choromosome\E/)

if (index($element[4], $Homosapiens) >= 0 &&
    index($element[4], $choromosome) >= 0)