Архив ‘code’

Немножко подфиксил бота для Твит-PR

Вызывается с параметром тег [сколько записей смотреть на предмет твиттерчан, по умолчанию 100] Типа perl script.pl followfriday 80 — пролистает 80 последних записей ленты и вычленит из них все встречающиеся ники, которые потом поделит на посты до 140 символов. Запись в кроне, соответственно — # пятница 10 16 * * 5 perl script.pl followfriday # понедельник […]

23 строки для понимания memory leak в perl

#!/usr/bin/perl -w use strict; use Term::ANSIColor; if (defined ($ARGV[0]) && $ARGV[0]!~/[0-9]+/){     print color 'reset';