my $rs = $c->model("YOUset::THISupSOMEWHERE")
    ->search({ id => 1234,
               color => [qw/ Blue Orange /] });

# Same but different query form for conceptual reuse-
$c->model("YOUset::THISupSOMEWHERE")
    ->search({ id => 1234,
               -or => [ color => "Blue",
                        color => "Orange" ] });

##</code><code>##

use SQL::Abstract;
my $sql = SQL::Abstract->new;

{
    my ( $stmt, @bind ) = $sql
        ->select("Table", "*", { id => 1234,
                                 color => [qw/ Blue Orange /] });
    print $stmt, $/;
}

{
    my ( $stmt, @bind ) = $sql
        ->select("Table", "*", { id => 1234,
                                 -or => [ color => "Blue",
                                          color => "Orange" ] });
    print $stmt, $/;
}
__END__
SELECT * FROM Table WHERE ( ( ( color = ? OR color = ? ) AND id = ? ) )
SELECT * FROM Table WHERE ( ( ( color = ? OR color = ? ) AND id = ? ) )