diff --git a/lib/Module.pm b/lib/Module.pm
index 52f04ed..eaad27c 100755
--- a/lib/Module.pm
+++ b/lib/Module.pm
@@ -144,7 +144,7 @@ sub get_failed_descendants {
 
   my $sdist = $self->_get_dist;
   if (grep {$_->_get_dist eq $sdist} @$loop) {
-    print "Loop detected with ", $self->name, ".  Short circuiting\n";
+    print STDERR "Loop detected with ", $self->name, ".  Short circuiting\n";
     return();
   }
 
@@ -156,7 +156,7 @@ sub get_failed_descendants {
 
   my $c=1;
   for my $mod_name (@$candidates) {
-    printf "%03d %05d\r", $level, $c++;
+    print STDERR sprintf "%03d %05d\r", $level, $c++;
     my $module = Module->new_module($mod_name);
 
     if ($module->depends_on($self)) {
@@ -164,7 +164,7 @@ sub get_failed_descendants {
     }
   }
 
-  print "\n";
+  print STDERR "\n";
 
   $rev_depcache{$self->name} = [@total];
   __save_cache;
diff --git a/statfailures.pl b/statfailures.pl
index 7b85af3..c354cbc 100755
--- a/statfailures.pl
+++ b/statfailures.pl
@@ -17,15 +17,17 @@ my @failed_list = grep {my $s=$data->{jobstatus}{$_}{status}; $s ne 'success' &&
 
 my %mods;
 
+$|++;
+
 LOOP: for my $mod ($data->{modules}->@*) {
   my $status = $data->{jobstatus}{$mod}{status} // "";
 
-  if ($status ne 'success') {
-    print "DEP Checking $mod\n";
+  if ($status ne 'success' && $status ne 'inc failed') {
+    print STDERR "DEP Checking $mod\n";
     my $module = Module->new_module($mod);
     my @dependedonby = $module->get_failed_descendants(\@failed_list);
 
     $mods{$mod} = 0+@dependedonby;
-    print "Count $mod => $mods{$mod}\n";;
+    print "$mod $mods{$mod}\n";
   }
 }