#!/usr/bin/perl -w
# това е скрипт, който разпечатва произволно една от „мъдростите“, 
# с които ще се опитам да провокирам хората, които четат моите писма
# да обърнат внимание на езика, който използват.


use strict;
my %wits = (
  0  => "Шльокавицата сериозно уврежда зрението\nи нервите на четящия!\n",
  1  => "Кварталните лекета „кликат“, останалите хора „щракат“!\n",
  2  => "„Адвам“, „килвам“ и „чеквам“ са хубави думи,\nно не и в българския език!\n",
  3  => "Бъди българин – говори български!\n",
  4  => "Бъди едни гърди пред другите –\nговори правилен български!\n",
  5  => "Не се чуди дали „чайлдове“ или „чилдръни“ е по-правилно –\nи двете са грешни!\nИзполвай „дъщерен/дъщерни“ (процес/и)!\n",
  6  => "„Принтвам“ е също толкова грозно като лопата\nпресен оборски тор в средата на хола!\nИзползвай „разпечатвам“!\n",
  7  => "Иф ю файнд иритейтинг риидинг ън инглиш текстс ин сирилик,\nден ю ноу хау ай фиил риидинг булгейриън ин латин.\n",
  8  => "Шльокавицата – враг номер едно на Тутраканската селищна система!\n",
  9  => "Българският език е едно от малкото хубави неща,\nкоито са ни останали. Не го съсипвайте!!!\n",
  10 => "Омразата към учителката по български език в училище\nне бива да е причина за незнанието на родния език.\nПросто замени ръководство по ръкоблудство с правописно помагало!\n",
  11 => "По дрехите посрещат, по езика изпращат.\n"
);

print $wits{int(rand(scalar keys %wits))};