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

    −118

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    12. 12
    13. 13
    14. 14
    15. 15
    16. 16
    17. 17
    18. 18
    19. 19
    20. 20
    21. 21
    22. 22
    23. 23
    24. 24
    25. 25
    26. 26
    27. 27
    28. 28
    29. 29
    30. 30
    31. 31
    32. 32
    33. 33
    34. 34
    35. 35
    36. 36
    37. 37
    38. 38
    39. 39
    40. 40
    41. 41
    42. 42
    43. 43
    44. 44
    45. 45
    46. 46
    47. 47
    48. 48
    49. 49
    50. 50
    51. 51
    52. 52
    53. 53
    54. 54
    55. 55
    56. 56
    57. 57
    58. 58
    59. 59
    60. 60
    61. 61
    62. 62
    63. 63
    64. 64
    65. 65
    66. 66
    67. 67
    68. 68
    69. 69
    70. 70
    71. 71
    72. 72
    73. 73
    74. 74
    if(
    ( $session_begin ge $tariff_ref->{date} ) &&
    ( !$tariff_ref->{date_end} || $session_begin le $tariff_ref->{date_end} ) &&
    ( !$tariff_ref->{nas_id} || $tariff_ref->{nas_id} eq $nas_id) &&
    ( !$tariff_ref->{ppp_type} || $tariff_ref->{ppp_type} eq $ppp_type) &&
    ( $notariffzone || !$tariff_ref->{tariff_zone} ||
                    $tariff_ref->{tariff_zone} eq $tariff_zone) &&
    ( !$tariff_ref->{client_type} || $tariff_ref->{client_type} eq $client_type) &&
    ( !$tariff_ref->{day_type} || $tariff_ref->{day_type} eq
                    &common::type_of_day($oper_id,$session_begin) ) &&

    (
            (!$divide_by_time_zone &&
                    (!$tariff_ref->{time_from} || !$tariff_ref->{time_to}  ||
                            &common::check_time_zone(
                            $session_begin,
                            $tariff_ref->{time_from},
                            $tariff_ref->{time_to}
                            )
                    )
            ) ||
            ($divide_by_time_zone &&
                    (!$tariff_ref->{time_from} || !$tariff_ref->{time_to}  ||

                            &common::check_time_zone(
                            $session_begin,
                            $tariff_ref->{time_from},
                            $tariff_ref->{time_to}
                            ) ||

                            &common::check_time_zone(
                            $session_end,
                            $tariff_ref->{time_from},
                            $tariff_ref->{time_to}
                            ) ||

                            &common::check_time_zone(
                            $tariff_ref->{time_from},
                            common::get_time_from_str($session_begin),
                            common::get_time_from_str($session_end),
                            )
                    )


                )
    ) &&

    (
            (!$divide_by_counter &&
                    (!defined($tariff_ref->{counter1_from}) || !defined($tariff_ref->{counter1_to})

                            || ($tariff_ref->{counter1_from} <= $resource_begin &&
                            $resource_begin < $tariff_ref->{counter1_to} )
                    )
            ) ||
            ($divide_by_counter &&
                        (!defined($tariff_ref->{counter1_from}) || !defined($tariff_ref->{counter1_to})
                            || ($tariff_ref->{counter1_from} <= $resource_begin &&
                            $resource_begin < $tariff_ref->{counter1_to} )

                            || ($tariff_ref->{counter1_from} <= $resource_end  &&
                            $resource_end < $tariff_ref->{counter1_to} )

                            || ($resource_begin <= $tariff_ref->{counter1_from} &&
                            $tariff_ref->{counter1_from} < $resource_end)
                    )

            )


    )


) {

    Один if от создателя :) Еще (с) Руслан Залата

    Запостил: SanityIO, 12 Января 2011

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

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