--my $binlog = mysql_retrieve('SHOW SLAVE STATUS', host => $replica, group => 'mysql-purge-binlogs', format => 'one')->{Relay_Master_Log_File}; ++my $binlog = /usr/bin/mysql -h MYHOST -u repl --password='MYPASSWORD' -e 'SHOW SLAVE STATUS;' | awk -F '\t' '0 == NR % 2 {print $10}'; Закостылил перл башом. Бесценно блять. Во всяком случае, проще, чем обновить перлолибы. На lucid-е. С дохлыми репозиториями. Без модулей ядра. И без make.

#ooturt 1
Вы можете выбрать до 10 файлов общим размером не более 10 МБ.