title: Perl DosGlob fails after first evaluation
body: <p>I have a script which poplulates filenames and last modified time of the respective file under a particular directory. I have used DosGlob module to specify the regex. </p>
  
  <p>Sample directory structure is:<br>
  <code>//share16/ABC/X/Output/1/</code><br>
  <code>//share16/ABC/X/Output/2/</code><br>
  <code>//share16/ABC/Y/Output/1/</code><br>
  <code>//share16/ABC/Y/Output/2/</code> </p>
  
  <p>Below is the code which does the above and there is further code after this which is out of present context.</p>
  
  <pre><code>use File::DosGlob 'glob';
  my @dir_regex = glob "//share16/ABC/*/Output/";
  for my $dir (@dir_regex) {
      find( { wanted =&gt; \&amp;process_file, no_chdir =&gt; 1 }, $dir ) or die $!;
  }
  
  sub process_file {
      my $dummy = $_;
      if ( -f $dummy ) {
          my $filename = "//share16/TOOLS/report.txt";
          open( my $fh, '&gt;&gt;', $filename )
              or die "Could not open file '$filename' $!";
          my $last_mod_time = ctime( stat($dummy)-&gt;mtime );
          print $fh "$last_mod_time $dummy\n";
      }
      close $fh;
  }
  </code></pre>
  
  <p>The script successfully lists down the files under all folders (folder 1, folder 2) under the first directory X but fails immediately when it starts reading the folder Y. </p>
  
  <p>Error: No such file or directory at \share16\traverse4.pl line 5.</p>
  
  <p>I am clueless as to why it is failing as I have tried hardcoding the foldername in dir_regex but it still fails after listing the files under the first directory. </p>