This is puzzling. It is custom code so highly likely that it is in the code. That being said, if this worked flawlessly with 6.7.2 and fails now, something is funky.Can you share the code ? If you can reproduce/isolate the problem, it should not be to hard to fix. There is nothing systemic in 7.2 that should cause this. It has to be a stupid difference and normal debugging should take care of it.
opendir(DIR, "$docs_dir") || warn "Unable to read directory; $docs_dir ($!)\n";@files = readdir(DIR);closedir(DIR);
opendir(DIR, "$docs_dir") || warn "Unable to read directory; $docs_dir ($!)\n";@files = grep { !-d "$docs_dir/$_" } readdir(DIR);closedir(DIR);
foreach $file (@files) { next if ($file eq "."); next if ($file eq ".."); my $filefif = $file; $filefif =~ s|(.*)\.\w\w\w|$1|; $file_ext_fif = $file; $file_ext_fif =~ s|.*\.(\w\w\w)|$1|; ...}