Bacon cipher: Difference between revisions
Content added Content deleted
(→Raku: .. use bound sub-array instead of addressing list of 1-char lists .[0] hack; and minor changes) |
m (→Raku: refactor the use of possibly non-existent nice rakudo internal word wrapping func) |
||
Line 2,335: | Line 2,335: | ||
my $baconed = bacon $str, $msg; |
my $baconed = bacon $str, $msg; |
||
$baconed |
$baconed = $baconed.?naive-word-wrapper || $baconed; |
||
# FIXME ^^^ makes dbl space after . |
|||
say "text:\n$baconed\n"; |
say "text:\n$baconed\n"; |
||
my $unbaconed = unbacon($baconed).trim.uc; |
my $unbaconed = unbacon($baconed).trim.uc; |