title: Perl matching multidimensional array elements
body: <p>Im not getting any output, anyone get where the issue lies,
  matching or calling?
  (The two subarrays in the multidimensional array have the same length.)</p>
  
  <pre><code>//Multidimensional array,
  //Idarray = Fasta ID, Seqarray = "ATTGTTGGT" sequences
  @ordarray = (\@idarray, \@seqarray);
  
  
  //This calling works
  
  print $ordarray[0][0] , "\n";
  print $ordarray[1][0] , "\n", "\n";
  
  // Ordarray output = "TTGTGGCACATAATTTGTTTAATCCAGAT....."
  </code></pre>
  
  <p>User inputs a search string, loop iterates the sequence dimension,
  and counts amount of matches. Prints number of matches and the corresponding ID from the ID dimension.</p>
  
  <pre><code> //The user input-searchstring
      $sestri = &lt;&gt;;
  
  for($r=0;$r&lt;@idarray;$r++) {
  
      if ($sestri =~ $ordarray[1][$r]  ){
  
          print $ordarray[0][$r] , "\n";
          $counts = () = $ordarray[0][$r] =~ /$sestri/g;  
          print "number of counts: ", $counts ;
  
      }
  </code></pre>