Perl Golf на YAPC::Russia 2014

все таки подумал еще, 232 байта:

while(<>) {
    ($d[@d]) = split /\n|:/;
};

sub l{
    my ($a, $i) = pop;
    for (@d) {
        @r = split /,\s/;
        if (!($i++ ~~ @_) && $a ~~ @r) {;
           'Erdos' ~~ @r && push @p, $c || $a ne 'Erdos' ? @_+1 : 0;
           $_ ne $a && l(@_, $i-1, $_) for @r;
        }
    }
    $c++;
}

l shift @d;
print((sort@p)[0]//'Inf');

#!/usr/bin/perl -l
while(<>){($d[@d])=split /\n|:/};sub l{my($a,$i)=pop;for(@d){@r=split/,\s/;if(!($i++~~@_)&&$a~~@r){'Erdos'~~@r&&push@p,$c||$a ne'Erdos'?@_+1:0;$_ ne$a&&l(@_,$i-1,$_)for@r}}$c++}l shift@d;print((sort@p)[0]//'Inf')

Perl Golf на YAPC::Russia 2014

250 байт, дальше думать лень :(

#!/usr/bin/perl -l
while($d[@d] = <>){$d[-1] =~ s/(:.+)|\s//g};pop @d;

sub l{
    my $a = shift;
    my $i;
    for (@d) {
        @r = split /,/;
        if (!($i++ ~~ @_) && $a ~~ @r) {
            'Erdos' ~~ @r && push @p, $c || $a ne 'Erdos' ? @_+1 : 0;
            l($_, @_, $i-1) for grep { $_ ne $a } @r;
        }
    }
    $c++;
}

l shift @d;
print((sort@p)[0]//'Inf'

#!/usr/bin/perl -l
while($d[@d]=<>){$d[-1]=~s/(:.+)|\s//g};pop@d;sub l{my$a=shift;my$i;for(@d){@r=split/,/;if(!($i++~~@_)&&$a~~@r){'Erdos'~~@r&&push@p,$c||$a ne'Erdos'?@_+1:0;l($_,@_,$i-1)for grep{$_ ne$a}@r}}$c++}l shift@d;print((sort@p)[0]//'Inf')

Блокировка запуска второго экземпляра программы на Perl

На самом деле да, но без блокировки + дополнительно возможность поиска среди процессов по command line, на случай если не удалось прочитать pid file.
Кстати, в вашем коде вы проверяете:
if (defined $result) {
chomp $result;
}

а автор Proc::Daemon не поленился написать if (! $pid || ( $pid && $pid =~ /\D/s )

Блокировка запуска второго экземпляра программы на Perl

Всегда интересно, полезно, правильно знать, как решили такую же задачу другие ребята.
Но, в случае ядра Linux, это может занять неоправданно много времени. В случае Proc::Daemon кода совсем мало, так почему бы и не заглянуть.

Забавно, что ваша статья как раз появилась в тот момент, когда я раздумывал над той же проблемой. Но у меня сервис может запускаться как в консольном режиме, так и режиме демона. И нужно предотвратить, в том числе, одновременный запуск в режиме приложения и демона одновременно. А поскольку я использую Proc::Daemon, то правильным ваиантом для меня будет, видимо, подход, который используется в Proc::Daemon.

Блокировка запуска второго экземпляра программы на Perl

А еще можно заглянуть в исходники metacpan.org/source/DETI/Proc-Daemon-0.14/lib/Proc/Daemon.pm и посмотреть, как решается данная проблема там.

Минкомсвязи хочет увеличить количество программистов в России с 350 тыс до 1 млн

Про НДС возможно не прав, возможно ООО не хочет работать с ИП без НДС, так как ООО потом не может сделать возврат НДС. Можете кто-либо пояснить, прав ли я?

Минкомсвязи хочет увеличить количество программистов в России с 350 тыс до 1 млн

Про НДС возможно не прав, возможно ООО не хочет работать с ИП без НДС, так как она потом не может вернуть НДС. Можете пояснить, прав ли я?

Минкомсвязи хочет увеличить количество программистов в России с 350 тыс до 1 млн

Насколько я помню, если у вас ИП по «упращенке»:
1) НДФЛ вы не платите вообще: www.nalog.ru/rn77/ip/ip_pay_taxes/usn/
2) Взнос в пенсионный фонд и социальное страхование — это фиксированный взнос:http://www.pfrf.ru/ot_vladir_pr_releases/70914.html

Насчет того, что некоторые ООО не хотят работать с ИП без НДС, мне не очень понятно. Ниже я написал, что это имеет смысл, когда вы продаете что-то, что будет потом перепродано. Но вы пишите, что вы аутсорсер…

Минкомсвязи хочет увеличить количество программистов в России с 350 тыс до 1 млн

Ну, во-первых:
ООО отвечает своим уставным капиталом и собственностью.
ИП отвечает своим имуществом. Что не ОК.

Частая схема, когда часть сделок идет через ООО, которое работает по налоговой схеме ОСНО или УСН доходы минус расходы, т.е. вы платите налог с разницы между доходом и расходом.
А через ИП проводите те сделки, которые не подразумевают расходов и вы платите 6% со всего дохода.

Для примера вы продали какое-то оборудование — проводите через ООО, платите налог с того, что накинули сверху (по УСН 15%).
Оказываете услугу — расходов нет. Проводите через — платите налог 6% со всей суммы.

Есть еще нюанс, что некоторые ООО не хотят работать с ИП, так как оно не платит НДС. Это имеет смысл, но только в случае, если компания, который вы продали что-то, собирается это что-то перепродать, (в таком случае она заплатит НДС за вас).

Но, на самом деле, поскольку, автор коммента про 50% пишет, что он аутсорсер, я не очень понимаю, зачем ему ООО, поскольку расходов у него должны быть очень мало.

Минкомсвязи хочет увеличить количество программистов в России с 350 тыс до 1 млн

У меня ИП. Плачу очень мало:
1) 6% налог
2) двадцать с чем то тысяч в пенсионный (в год);
3) При этом 6% налог уменьшается на сумму отправленных платежей в пенсионный. то есть по факту я только плачу 6%.
4) Еще после окончания года нужно будет заплатить в пенсионный 1% от суммы полученной за год, превышающей 300 тыс. р.
5) Еще банку в месяц плачу 2500 за ведение счетов + какая-то комиссия за валютный контроль, меньше процента от поступления.
Это всё. Какие 50%? :)

История компании Audio-Technica

Как-то раз видел приспособление для приготовление суши с их логотипом. Сейчас вспомнил, погуглил и нашел вот что: www.autec-usa.com/aboutus.html

Забудь про СХД. Nutanix – революция в виртуализации

>>И да, SRM мы тоже официально поддерживаем, правильно замечено.

То есть, у вас есть сертифицированый SRA? (В списке доступных не нашел.)
Поддерживается ли VMImageConsistency при репликации (при использовании SRA и вашего DR)?

И кстати, поддерживается ли HardwareAcceleratedMove, HardwareAcceleratedInit (VAAI)?

Недокументированные операционные коды процессора 8086

Когда-то давно читал, что только на 8086 (насчет 8088 не уверен) можно было выполнить mov cs,ax. И это был бы межсегментный переход.
Даже был какой-то вирус, который работал только на 8086 из-за использования этой возможности.

Операционную систему Plan 9 опубликовали под GPLv2

Какой-то флаг, который отключен. По всей видимости, чтобы включить — нужно ноль заменить на единицу.

Зачем приложению Facebook доступ к твоим СМС?

Полагаю, если приложение действительно будет отправлять содержимое СМС на сервера facebook, то это быстро выяснится.

Биржа убийств — правильное использование Bitcoin

Это не по Хайнлайну, это вот по чему: en.wikipedia.org/wiki/Assassination_politics