diff --git a/disableembperl.pl b/disableembperl.pl
new file mode 100755
index 0000000..ca83fc4
--- /dev/null
+++ b/disableembperl.pl
@@ -0,0 +1,16 @@
+#!/usr/bin/env perl
+
+use 5.24.0;
+
+use Data::Dumper;
+use Storable;
+
+my $data = retrieve $ARGV[0];
+
+for my $mod ($data->{modules}->@*) {
+	if ($mod =~ /Embperl/ && !$data->{jobstatus}{$mod}{tested}) {
+		$data->{jobstatus}{$mod}={tested => 3, status => "embperl failure"};
+	}
+}
+
+store $data, $ARGV[0].'.new';
diff --git a/everything.stor b/everything.stor
index 27b4dd4..1e6930f 100644
Binary files a/everything.stor and b/everything.stor differ