1. Perl / Говнокод #4995

    −117

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    6. 6
    7. 7
    8. 8
    9. 9
    my $result = `zabbix_agent -t proc.num[,,,*.pl]`
    ...
    #удаляем файлы форков
    `rm /tmp/event_agent_fork_*`;
    `rm /tmp/event_agent_main_*`;
    ...
    `killall -9 event_agent.pl`;
    sleep(5);
    `/usr/local/blabla/bin/blabla.pl`;

    Запостил: LusterDroid, 20 Декабря 2010

    Комментарии (7) RSS

    Добавить комментарий