diff options
| author | Luca Ferrari <fluca1978@gmail.com> | 2022-11-07 10:03:04 +0100 |
|---|---|---|
| committer | Luca Ferrari <fluca1978@gmail.com> | 2022-11-07 10:03:04 +0100 |
| commit | 5afb554c5b66a80bd83e307099565a7d86eb87da (patch) | |
| tree | 3695de3085fd81c28783c079b0d56e05c43ac755 /challenge-190 | |
| parent | 07a532a4a6660519af257438a044592df8164452 (diff) | |
| download | perlweeklychallenge-club-5afb554c5b66a80bd83e307099565a7d86eb87da.tar.gz perlweeklychallenge-club-5afb554c5b66a80bd83e307099565a7d86eb87da.tar.bz2 perlweeklychallenge-club-5afb554c5b66a80bd83e307099565a7d86eb87da.zip | |
Remove debug output.
Diffstat (limited to 'challenge-190')
| -rw-r--r-- | challenge-190/luca-ferrari/postgresql/ch-1.plperl | 1 |
1 files changed, 0 insertions, 1 deletions
diff --git a/challenge-190/luca-ferrari/postgresql/ch-1.plperl b/challenge-190/luca-ferrari/postgresql/ch-1.plperl index 4c725c0c7e..45686303b3 100644 --- a/challenge-190/luca-ferrari/postgresql/ch-1.plperl +++ b/challenge-190/luca-ferrari/postgresql/ch-1.plperl @@ -8,7 +8,6 @@ pwc190.task1_plperl( text ) RETURNS int AS $CODE$ my ( $word ) = @_; - elog( INFO, "Word $word "); return 1 if ( $word =~ / ^ [A-Z] [a-z]+ $ /x || $word =~ / ^ [a-z]+ $ /x || $word =~ / ^ [A-Z]+ $ /x ); |