CASE WHEN ...那么SQL语法的DBIx :: Class语法是什么？

Question

有谁知道什么是SQL查询的DBIx :: Class等价物,例如:

SELECT cdr_id,CASE WHEN service_id ='GPRS'THEN'KB'When service_id ='SMS'THEN'SMS'END as AS FROM FROM ...

谢谢

Answer 1

my $rs = $schema->resultset( 'table' )->
    search_rs( {} ,
               { '+columns' => {
                     unit => 
                         \do { "CASE WHEN me.service_id='GPRS' THEN 'KB' " .
                                "WHEN me.service_id='SMS' THEN 'SMS' END" }
               } ) ;

沿着这条线的东西应该有效.