Sha256: 73cfcb4cd858af4f420f6761970b925927993a159d759e984d848a7c33c5e371
Contents?: true
Size: 568 Bytes
Versions: 73
Compression:
Stored size: 568 Bytes
Contents
package Cipher;
use strict;
use warnings;
sub encode {
my $plaintext = shift;
# normalize
(my $cipher = $plaintext) =~ s/[^\p{Alnum}]//g;
$cipher = lc $cipher;
# translate
$cipher =~ tr/abcdefghijklmnopqrstuvwxyz/zyxwvutsrqponmlkjihgfedcba/;
# wordify
$cipher =~ s/(\p{Alnum}{5})(?=\p{Alnum})/$1 /g;
return $cipher;
}
sub decode {
my $cipher = shift;
(my $plaintext = $cipher) =~ s/[^\p{Alnum}]//g;
$plaintext =~ tr/zyxwvutsrqponmlkjihgfedcba/abcdefghijklmnopqrstuvwxyz/;
return $plaintext;
}
__PACKAGE__;
Version data entries
73 entries across 73 versions & 1 rubygems