Comprobar si una string es palíndromo o no en PL/SQL

Requisito previo : introducción
a PL/SQL En el código PL/SQL, los grupos de comandos se organizan dentro de un bloque. Un grupo de bloques relacionado con declaraciones o sentencias. En declare part, declaramos variables y entre start y end part, realizamos las operaciones.

Dada una string y la tarea es encontrar si es Palindrome o no.
Ejemplos:

Input: str = geeksskeeg
Output: geeksskeeg is palindrome

Input: str = geeks
Output: geeks is not palindrome

El enfoque es tomar la string, invertirla y verificar si la string invertida es igual a la string original o no. Si es igual, entonces será palíndromo, de lo contrario no.

A continuación se muestra la implementación requerida:

DECLARE 
  
    -- Declared variables are s, l, t . 
    -- These variables are of same data type VARCHAR. 
    s VARCHAR2(10) := 'abccba'; 
    l VARCHAR2(20); 
    t VARCHAR2(10); 
BEGIN 
    FOR i IN REVERSE 1..Length(s) LOOP 
        l := Substr(s, i, 1); 
  
        -- here || are used for concatenation of string. 
        t := t 
             ||'' 
             ||l; 
    END LOOP; 
  
    IF t = s THEN 
      dbms_output.Put_line(t 
                           ||'' 
                           ||' is palindrome'); 
    ELSE 
      dbms_output.Put_line(t 
                           ||'' 
                           ||' is not palindrome'); 
    END IF; 
END; 
  
-- Program End 

Producción:

abccba is palindrome