DBICでsenna(tritonn)のkwicを使ってみる

DBICでsenna(tritonn)のkwicを使ってみた。
kwicってのはtritonnが提供しているgoogle検索結果っぽく表示してくれる関数。

my $kwic_query = 'me.wiki_text,\'150\',\'1\',\'1\',\'\',\'\','.$search_query.'\',\'<span class="hit_keyword">\',\'</span>\'';

my $wikipedia = $c->model('DBIC::Wikipedia')->search(
    id => $wikipedia_id,
    {
	'+select' => [
	    {'kwic' => $kwic_query},
	],
	'+as' => [
	    qw/wiki_text/,
	],
    }
);

なんか大変だけど
$wikipedia->first->wiki_text;
で取得できたし、ちゃんと