Yet Another CPAN Grep

SQL-Concat ( H/HK/HKOBA/SQL-Concat-0.010.tar.gz, HKOBA, 2025; MetaCPAN )

SQL-Concat/lib/SQL/Concat.pm ( view source; MetaCPAN )

 return;
    }
    elsif ($la->[$i] ne $ra->[$i]) {
      return;
    }
  }
  return 1;
}

sub TO_JSON {
  (my MY $self) = @_;
  [$self->as_sql_bind];
}

sub SQL {
  MY->new(sep => ' ')->concat(@_);
}