diff --git a/tools/base64-encode b/tools/base64-encode
new file mode 100755
index 000000000..348f27864
--- /dev/null
+++ b/tools/base64-encode
@@ -0,0 +1,2 @@
+#!/bin/sh
+perl -MMIME::Base64 -e 'print encode_base64(join("", <>))'