for my $item (@drc::file) {
   if ($item =~ m/^\s*\Module:/i ) { $moduleName = getModuleName($item); }
   ...
}