Zde uvádím příklad pro ověření e-mailové adresy pomocí regulárních výrazů PL/SQL (REGEXP) v Oracle.
Ověření e-mailu pomocí programu PL/SQL
V následujícím programu PL/SQL ověří e-mailovou adresu pomocí funkce REGEXP_LIKE.
SET SERVEROUTPUT ON;DECLARE b_isvalid BOOLEAN;BEGIN b_isvalid :=REGEXP_LIKE ('jakákoli [email protected]' , '^[A-Za-z0-9._%+-]+@[A-Za-z0-9.-]+\.[A-Za-z]{2,4}$' ); IF b_isvalid THEN DBMS_OUTPUT.put_line ('Je to platná e-mailová adresa.'); ELSE DBMS_OUTPUT.put_line ('Není platná e-mailová adresa.'); END IF;END;/
Výstup
Je to platná e-mailová adresa.Procedura PL/SQL byla úspěšně dokončena.
Získejte seznam neplatných e-mailových adres z tabulky pomocí SQL
Následující SQL dotaz načte všechny neplatné e-mailové adresy uložené ve sloupci EMAIL tabulky ZAMĚSTNANCI v Oracle.
VYBERTE * OD ZAMĚSTNANCŮ WHERE NOT REGEXP_LIKE (e-mail , '^[A-Za-z0-9._%+-]+@[A-Za-z0-9.-]+\.[A-Za-z]{2,4}$');Podobně, chcete-li získat seznam platných e-mailových adres, odstraňte NOT z výše uvedeného dotazu.
Viz také:
- Zkontrolujte, zda je soubor obrázkem pomocí PL/SQL