今日の誕生日を返そうとしています。これは私が今持っているもので、動作しますが、月と日を取得してステートメントに入力する必要があります。ローカルタイムから取得できるのではないかと思ったのですが、うまくいきませんでした。任意の提案をいただければ幸いです。
sub author_birth {
    my ($self) = @_;
    my ($day,$month) = (localtime())[3..4];
    my $author_result = $self->search_like(
        {
            birth => '%03-20'
        },
        {
            select => [
                'id',
                'complete_name',
            ],
            #result_class => 'DBIx::Class::ResultClass::HashRefInflator'
        }
    );
    my @author_ids = ();
    while (my $row = $author_result->next) {
        push @author_ids, $row->id;
    }
    return $self->get_author_info_by_id(\@author_ids);
}