diff --git a/lib/PAUSE/dist.pm b/lib/PAUSE/dist.pm
index 7e70cf683..2c7ad730c 100644
--- a/lib/PAUSE/dist.pm
+++ b/lib/PAUSE/dist.pm
@@ -316,6 +316,7 @@ sub examine_dist {
     $self->verbose(1,"Dist '$dist' is a single-.pm-file upload\n");
     $suffix = "N/A";
     $skip   = 1;
+    $self->{SKIP_REPORT} = PAUSE::mldistwatch::Constants::EBAREPMFILE;
   } elsif ($dist =~ /\.zip$/) {
     $suffix = "zip";
     my $unzipbin = $self->{UNZIPBIN};
diff --git a/lib/PAUSE/mldistwatch/Constants.pm b/lib/PAUSE/mldistwatch/Constants.pm
index 38fc666cc..3f504b956 100644
--- a/lib/PAUSE/mldistwatch/Constants.pm
+++ b/lib/PAUSE/mldistwatch/Constants.pm
@@ -11,12 +11,14 @@ use constant EOPENFILE => 21;
 use constant EMISSPERM => 20;
 use constant EPARSEVERSION => 10;
 use constant EMETAUNSTABLE => 6;
+use constant EBAREPMFILE => 5;
 use constant EOLDRELEASE => 4;
 use constant EMTIMEFALLING => 3; # deprecated after rev 478
 use constant EVERFALLING => 2;
 use constant OK => 1;
 
 our $heading = {
+  EBAREPMFILE() => "Bare .pm files are not indexed",
   EDBCONFLICT() => "Conflicting record found in index",
   EDBERR() => "Database error",
   EDUALOLDER() => "An older dual-life module stays reference",