From ca98b2ba8799b40ca0fe5b38b34c817a0215b119 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?John=20Ankarstr=C3=B6m?= <john@ankarstrom.se>
Date: Wed, 26 May 2021 01:33:06 +0200
Subject: Improve 'm-pop' script

Username and password have been moved to environment variables.
Command-line interface has improved.
---
 src/fh | 23 -----------------------
 1 file changed, 23 deletions(-)
 delete mode 100755 src/fh

(limited to 'src/fh')

diff --git a/src/fh b/src/fh
deleted file mode 100755
index 74c84a4..0000000
--- a/src/fh
+++ /dev/null
@@ -1,23 +0,0 @@
-#!/usr/bin/perl -p
-
-# fh -- filter headers
-
-BEGIN {
-	sub header { $_ =~ shift .. not $next =~ /^[ \t]/ }
-	sub skip { $_ = '' }
-}
-
-($_, $next) = ($next, $_);
-skip if header qr/^X-(?!(
-	  Mailer
-	| Rspamd-\S+
-):)/xi;
-skip if header qr/^(
-	  Received
-	| Received-SPF
-	| (DKIM|DomainKey)-Signature
-	| ARC-\S+
-	| IronPort-\S+
-):/x;
-
-END { print $next }
-- 
cgit v1.2.3