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

    −151

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    if( my $row = &dbselectrow( $sql ) )
        {
                if( $row -> { 'ofid' } == 9782 ) # moscow
                {
                        if( $row -> { 'jt' } =~ /Начальник /i )
                        {
                                &subscribe_to_management( $row -> { 'email' } );
                        }
                }
        }

    Автоматическая подписка сотрудника руководящей должности на список рассылки для руководителей.

    Запостил: kainwinterheart, 13 Февраля 2014

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

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