Кот
Имя: Скрипт
Характер: нордический
раскрыть ветку (2)
#!/usr/bin/perl
my $run_l=1;
my $now_time_l=time();
my $check_time_l=$now_time_l;
my $check_sec_l=5;
my ($is_rand_event_l,$rand_event_index_l)=(0,0);
my @events_arr_l=('eat','sleep','toilet','meow');
while ( $run==1 ) {
$now_time_l=time();
if ( $now_time_l<$check_time_l ) {
$is_rand_event_l=int(rand(2));
if ( $is_rand_event_l>0 ) {
$rand_event_index_l=int(rand(4));
print "Cat action: $events_arr_l[$rand_event_index_l]\n";
}
$check_time_l=$now_time_l+$check_time_l*int(rand(3600));
}
}
===
Примерно так)))
раскрыть ветку (1)
Котомафия
140K постов35.8K подписчика
Правила сообщества
В сообществе категорически запрещено:
✔Оскорблять других пользователей. Запрещено использование нецензурных выражений и ругательств. Замена части букв значками "@", "#", "$" и т. д. при вычислимости исходного слова не избавляет от ответственности. Категорически не рекомендуется использование грубо-просторечной лексики, а также упоминания физиологических отклонений;
✔ Сообщения не по теме. Публикуемые сообщения должны соответствовать заявленной теме сообщества;
✔Размещение постов о помощи животным в сообществе без обязательных тегов: #вдобрыеруки #помощь #без рейтинга
Так же напоминаем, что на Пикабу существует специальное сообщество ."Айболит. Помощь животным"
Дорогие друзья, которым не нравятся посты с просьбами о помощи животным, очень просим Вас добавить теги: #помощь #вдобрыеруки и др. в черный список.
✔Плагиат! Не присваивай себе чужие идеи, записи и другой авторский контент.
✔Некорректные комментарии в комментариях, откровенный флуд, провокации, пропаганду жестокого и безответственного отношения к животным и пр. участники заносятся в черный список без дополнительных пояснений и предупреждений!
✔Нарушать правила Пикабу.
Заметили нарушение правил: напишите ,
Не забывайте ставить тег "моё", "кот", "котомафия" если выкладываете своих любимцев.
Мы есть в VK: _fan, отмечайте нас на Ваших фото.