69  print "\n\n";
70  my $refarray3 = $matchedfiles[5];
71  print "File: ${$refarray3}[0] in directory ${$refarray3}[1]\n";