find(\&find_files, $data_dir);
for my $file (@data_dir_files) {
if (-f $file and not ($file =~ m|^\.| or $file =~ m|/\.|)) {
find(\&find_files, $data_dir);
for my $file (@data_dir_files) {
if (-f $file and not ($file =~ m|^\.| or $file =~ m|/\.|)) {
if ($file =~ m|^\.| or $file =~ m|/\.|) {
### check for any .gpg or .asc extensions except
### for the gpgdir_map_file
if ($file =~ m|^\.| or $file =~ m|/\.|) {
### check for any .gpg or .asc extensions except
### for the gpgdir_map_file
### check for any .gpg or .asc extensions except
### for the gpgdir_map_file
if ($file !~ m|gpgdir_map_file| and ($file =~ m|\.gpg$|
### check for any .gpg or .asc extensions except
### for the gpgdir_map_file
if ($file !~ m|gpgdir_map_file| and ($file =~ m|\.gpg$|