custom/feedback_files.pl

   1
   2 do 'custom-lib.pl';
   3
   4 sub feedback_files
   5 {
   6 opendir(DIR, $module_config_directory);
   7 local @rv = map { "$module_config_directory/$_" }
   8                 grep { /\.(cmd|edit)$/ } readdir(DIR);
   9 closedir(DIR);
  10 return @rv;
  11 }
  12
  13 1;
  14