diff options
| author | Mohammad Sajid Anwar <Mohammad.Anwar@yahoo.com> | 2024-02-05 18:58:36 +0000 |
|---|---|---|
| committer | GitHub <noreply@github.com> | 2024-02-05 18:58:36 +0000 |
| commit | 261ffda2e5ef595efd76b5692a7fcc7a5fe39a8a (patch) | |
| tree | 3f92c1382a3474bf5273fccd28fe740789ab3257 /challenge-255/luca-ferrari/plpgsql/ch-1.sql | |
| parent | 3e8277a32e27b17cee966058d5daef4a79ba6957 (diff) | |
| parent | 7ae41852c28f903f5821561705eba50147c9c6e4 (diff) | |
| download | perlweeklychallenge-club-261ffda2e5ef595efd76b5692a7fcc7a5fe39a8a.tar.gz perlweeklychallenge-club-261ffda2e5ef595efd76b5692a7fcc7a5fe39a8a.tar.bz2 perlweeklychallenge-club-261ffda2e5ef595efd76b5692a7fcc7a5fe39a8a.zip | |
Merge pull request #9520 from fluca1978/PWC255
PWC 255
Diffstat (limited to 'challenge-255/luca-ferrari/plpgsql/ch-1.sql')
| -rw-r--r-- | challenge-255/luca-ferrari/plpgsql/ch-1.sql | 18 |
1 files changed, 18 insertions, 0 deletions
diff --git a/challenge-255/luca-ferrari/plpgsql/ch-1.sql b/challenge-255/luca-ferrari/plpgsql/ch-1.sql new file mode 100644 index 0000000000..fba7114f5f --- /dev/null +++ b/challenge-255/luca-ferrari/plpgsql/ch-1.sql @@ -0,0 +1,18 @@ +-- +-- Perl Weekly Challenge 255 +-- Task 1 +-- See <https://perlweeklychallenge.org/blog/perl-weekly-challenge-255> +-- + +CREATE SCHEMA IF NOT EXISTS pwc255; + +CREATE OR REPLACE FUNCTION +pwc255.task1_plpgsql( origin text, shuffled text ) +RETURNS char +AS $CODE$ + SELECT s + FROM regexp_split_to_table( shuffled, '' ) s + WHERE s NOT IN ( SELECT v + FROM regexp_split_to_table( origin, '' ) v ); +$CODE$ +LANGUAGE sql; |