DBIx :: Class：結果集order_by基於列表中是否存在值

Question

我正在使用DBIx :: Class，並且我得到了一個ResultSet。我喜歡重新排序ResultSet。我喜歡根據固定的價值清單（「倫敦」，「紐約」，「東京」）檢查某個特定列「城市」。如果我希望將價值清單中的城市發現到最高組，如果找不到城市，我喜歡將結果移到ResultSet中的底層組。

Answer 1

ORDER BY expr可能是你在找什麼。

例如，下面的表格：

mysql> select * from test; 
+----+-----------+ 
| id | name  | 
+----+-----------+ 
| 1 | London | 
| 2 | Paris  | 
| 3 | Tokio  | 
| 4 | Rome  | 
| 5 | Amsterdam | 
+----+-----------+ 

這裏特殊的順序：

mysql> select * from test order by name = 'London' desc, 
            name = 'Paris' desc, 
            name = 'Amsterdam' desc; 
+----+-----------+ 
| id | name  | 
+----+-----------+ 
| 1 | London | 
| 2 | Paris  | 
| 5 | Amsterdam | 
| 3 | Tokio  | 
| 4 | Rome  | 
+----+-----------+ 

翻譯到這一點的ResultSet方法：

$schema->resultset('Test')->search(
    {}, 
    {order_by => {-desc => q[name in ('London', 'New York', 'Tokyo')] }} 
); 

Answer 2

喜歡的東西：

#!/usr/bin/env perl 
use strict; 
use warnings; 
my $what = shift or die; 
my @ary = qw(alpha beta gamma); 
unshift(@ary,$what) unless (grep(/$what/,@ary)); 
print "@ary\n"; 
1; 

運行方式：

./myscript omega