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

[alex_inside]

Немного с ошыпками, но всё же это 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!');

Comments

йопта

[hcjack]

=)))

[ex_ex_gluek]

[...] or die('I see Medved!'); [...]

[eduard_govnin]

быгыгыггггыыыыыыы

[cyniq]

Тут был Степан!!!

[alex_inside]

ЖОШ!