ANTICHAT - Показать сообщение отдельно

Для ROA сделал хранимую процедуру PostgreSQL для определения - високосный ли год или нет...
На вход приминимает,собственно год(допустим из определенного поля таблицы)...в принципе переделать на тип данных date не сложно ))

Код:

CREATE FUNCTION year_leap2 (integer) RETURNS integer AS $$
my $year = shift;
if($year%100 == 0)
{
        if($year%400 == 0)
        {
                return 1
        }
        else
        {
                return 0
        }
} else {
        if($year%4 == 0)
        {
                return 1
        }
        else
        {
                return 0
        }
}
$$ LANGUAGE plperl;

Смысла определять текущий год через CURRENT_DATE имхо нету, лишние затраты ресурсов - проще закешировать...

PS: Поправил на более читаемый вариант и без хаков с sprintf()