summaryrefslogtreecommitdiffstats
path: root/openssl/demos/b64.pl
diff options
context:
space:
mode:
Diffstat (limited to 'openssl/demos/b64.pl')
-rw-r--r--openssl/demos/b64.pl20
1 files changed, 0 insertions, 20 deletions
diff --git a/openssl/demos/b64.pl b/openssl/demos/b64.pl
deleted file mode 100644
index 8aa5fb4..0000000
--- a/openssl/demos/b64.pl
+++ /dev/null
@@ -1,20 +0,0 @@
-#!/usr/local/bin/perl
-
-#
-# Make PEM encoded data have lines of 64 bytes of data
-#
-
-while (<>)
- {
- if (/^-----BEGIN/ .. /^-----END/)
- {
- if (/^-----BEGIN/) { $first=$_; next; }
- if (/^-----END/) { $last=$_; next; }
- $out.=$_;
- }
- }
-$out =~ s/\s//g;
-$out =~ s/(.{64})/$1\n/g;
-print "$first$out\n$last\n";
-
-