use 5.010;
use strict;
use utf8;
use Encode qw/encode decode/;
use List::Util qw/shuffle/;
 
my $out = join " ", shuffle grep {
   length >= 3
} map {
   s/^\s+|\s+$//g; lc
} split /[\.\?,!]\s*|\n+/, decode("utf-8", join("", <>));
 
$out =~ s/(\w)(\ \w)/$1 . (rand > .80 ? (rand > .70 ? "." : ",") : "") . $2/ge;
$out =~ s/(^|\.\s*)(.)/$1 . uc $2/gme;
$out =~ s/\W*$/./;
 
say encode("utf-8", $out);

dXNlIDUuMDEwOwp1c2Ugc3RyaWN0Owp1c2UgdXRmODsKdXNlIEVuY29kZSBxdy9lbmNvZGUgZGVjb2RlLzsKdXNlIExpc3Q6OlV0aWwgcXcvc2h1ZmZsZS87CgpteSAkb3V0ID0gam9pbiAiICIsIHNodWZmbGUgZ3JlcCB7CiAgIGxlbmd0aCA+PSAzCn0gbWFwIHsKICAgcy9eXHMrfFxzKyQvL2c7IGxjCn0gc3BsaXQgL1tcLlw/LCFdXHMqfFxuKy8sIGRlY29kZSgidXRmLTgiLCBqb2luKCIiLCA8PikpOwogCiRvdXQgPX4gcy8oXHcpKFwgXHcpLyQxIC4gKHJhbmQgPiAuODAgPyAocmFuZCA+IC43MCA/ICIuIiA6ICIsIikgOiAiIikgLiAkMi9nZTsKJG91dCA9fiBzLyhefFwuXHMqKSguKS8kMSAuIHVjICQyL2dtZTsKJG91dCA9fiBzL1xXKiQvLi87CiAKc2F5IGVuY29kZSgidXRmLTgiLCAkb3V0KTs=

0KHQtdCz0L7QtNC90Y8g0JfQmtCfINC/0YDQvtGB0L3Rg9C70YHRjyDRgNCw0L3RjNGI0LUg0L7QsdGL0YfQvdC+0LPQviwg0Lgg0L7RgtGC0L7Qs9C+INC/0YDQtdCx0YvQstCw0Lsg0LIg0L/RgNC40L/QvtC00L3Rj9GC0L7QvCDQvdCw0YHRgtGA0L7QtdC90LjQuC4g0J7QvSDQv9C+0YLRj9C90YPQu9GB0Y8sINC90LDQtNC10Lsg0YHQstC+0Y4g0L/QvtC80Y/RgtGD0Y4sINC90L4g0LLRgdGRINC10YnRkSDQu9GO0LHQuNC80YPRjiDRiNCw0L/QvtGH0LrRgyDQuNC3INCw0LvRjtC80LjQvdC40LXQstC+0Lkg0YTQvtC70YzQs9C4IOKAiyjQutCw0Log0L7QvSDQv9C+0LvQsNCz0LDQuywg0L7QvdCwINC30LDRidC40YnQsNC10YIg0L7RgiDQvtCx0LvRg9GH0LXQvdC40Y8g0L/RgdC40YXQvtC00LXRgdGC0YDRg9C60YLQuNCy0L3Ri9C80Lgg0LLQvtC70L3QsNC80LgsINC40YHRhdC+0LTRj9GJ0LjQvNC4INC+0YIg0LPQtdC90LXRgNCw0YLQvtGA0L7QsiDQsiDQs9C70YPQsdC+0LrQuNGFINC/0L7QtNCy0LDQu9Cw0YUg0LjQvdC60LLQuNC30LjRgtC+0YDRgdC60L7Qs9C+INCc0LjQvdC40YHRgtC10YDRgdGC0LLQsCDQn9GA0LDQstC00YspINCy0LXRgdC10LvQviDQsdGD0YDRh9CwINC/0L7QtCDQvdC+0YEg0YfRgtC+LdGC0L4g0L/RgNC+INCx0L7QvNCx0LXRgNC+0LLQuNGH0LAsINC+0LTQtdC7INC00L7QvNCw0YjQvdC40LUg0YLQsNC/0L7Rh9C60Lgg0YHQviDRgdC80LXRiNC90YvQvNC4INC/0L7QvNC/0L7QvdGH0LjQutCw0LzQuCDQuCDQtNC70LjQvdC90YvQuSDQv9C70LDRiSDQvdCwINCz0L7Qu9C+0LUg0YLQtdC70L4uINCd0LDRiNCw0YDQuNCyINCyINC60LDRgNC80LDQvdC1INC/0LvQsNGJ0LAg0L3QtdC80L3QvtCz0L4g0YLRgNC10YHQvdGD0LLRiNC40LUsINC90L4g0LLRgdGRINC10YnQtSDQstGL0LPQu9GP0LTRj9GJ0LjQtSDRgNC10LrQstC40LfQuNGC0L7QvCDQuiDQvdC40LfQutC+0L/RgNC+0LHQvdC+0LzRgyDQs9C+0LvQu9C40LLRg9C00YHQutC+0LzRgyDQvNGL0LvRjNC90L7QvNGDINC60LjQvdGG0YMg0YfQtdGA0L3Ri9C1INC+0YfQutC4LCDQvtC9INC90LDRgtGP0L3Rg9C7INC40YUg0L3QsCDQvdC+0YEsINC00L7QstC10YDRiNC40Lsg0LXQs9C+INGN0LrQuNC/0LjRgNC+0LLQutGDINGA0Y7QutC30LDQuiwg0YHRg9C00Y8g0L/QviDRgtC+0LzRgyDRg9GB0LjQu9C40Y4sINGBINC60LDQutC40Lwg0JfQmtCfINCy0LfQstCw0LvQuNCy0LDQuyDQtdCz0L4g0L3QsCDRgdC/0LjQvdGDIC0g0YEg0LrQuNGA0L/QuNGH0LDQvNC4Lg==

Сегодня ЗКП проснулся раньше обычного, и оттого пребывал в приподнятом настроении. Он потянулся, надел свою помятую, но всё ещё любимую шапочку из алюминиевой фольги ​(как он полагал, она защищает от облучения психодеструктивными волнами, исходящими от генераторов в глубоких подвалах инквизиторского Министерства Правды) весело бурча под нос что-то про бомберовича, одел домашние тапочки со смешными помпончиками и длинный плащ на голое тело. Нашарив в кармане плаща немного треснувшие, но всё еще выглядящие реквизитом к низкопробному голливудскому мыльному кинцу черные очки, он натянул их на нос, довершил его экипировку рюкзак, судя по тому усилию, с каким ЗКП взваливал его на спину - с кирпичами.