ALeX inSide (alex_inside) wrote,
ALeX inSide
alex_inside

Программисты на perl?

Немного с ошыпками, но всё же это perl...
use Fotki2::Medved;

my $stepan = &Fotki2::Medved::getStepan() or die('Cant get Stepan!';

&Fotki2::Medved::randomizeMedvedies();

while (1) {
  my @medved = &Fotki2::Medved::getRandomMedvedsForUser($stepan) or die('Cant get Medved!');
  foreach @medved do &preved($_) or die('Medved failed to Preved!');
  &Fotki2::Medved::memcacheSurpriseData($stepan, \@medved);
}
PS: и ещё одна смешная надпись на доске в брифингруме :))
<div style="display: none;">Тут был Степан!!!1</div>
Tags: html, quotations, весело и вкусно, лингвистическое, программирование, сумасайти
Subscribe

  • В рамочку в рассылке

    Прикольно, пришло письмо из рассылки одной компании по маркетингу. В тексте письма у них статья, и в ней основные мысли оформлены вёрсткой идентичной…

  • В рамочку

    «Лучшего сапожника может выбрать только сапожник» Аристотель Плебисцит. Также известен как референдум. Множество политических проблем можно…

  • Мясо

    Мне недавно дохтур попросил определённые анализы сдать и нужно было не есть мясо 3 дня. Рыбу тоже нельзя. Даже каплю крови нельзя. Это я с субботней…

  • Post a new comment

    Error

    Anonymous comments are disabled in this journal

    default userpic

    Your reply will be screened

    Your IP address will be recorded 

  • 5 comments