PEQUATSEPHAL PISIU POSOSAL!

Максимум быдлокода.

Настоящий эмулятор Ханюфага должен быть выполнен в виде xmpp-бота.

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

$drink= <STDIN>;

Фу бля, ну и говно же пердл этот.

#!/usr/bin/perl

print «Ханюфаг, как чувствуешь?\n»;

$drink= <STDIN>;

chop $drink;

if($drink==‹Пьяный›)

{

print «Давай еще накатим!\n»;

}

else

{

print «Я лучше писи сосать буду!\n»;

}