From 05bd21e48e0310a256750ea2b421f758f68d2b40 Mon Sep 17 00:00:00 2001
From: Luca Ferrari <fluca1978@gmail.com>
Date: Mon, 6 Mar 2023 15:15:42 +0100
Subject: Fix key/value

---
 challenge-207/luca-ferrari/postgresql/ch-2.plperl | 2 +-
 challenge-207/luca-ferrari/postgresql/ch-2.sql    | 4 ++--
 2 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/challenge-207/luca-ferrari/postgresql/ch-2.plperl b/challenge-207/luca-ferrari/postgresql/ch-2.plperl
index 1f31604070..6794b73618 100644
--- a/challenge-207/luca-ferrari/postgresql/ch-2.plperl
+++ b/challenge-207/luca-ferrari/postgresql/ch-2.plperl
@@ -15,7 +15,7 @@ AS $CODE$
    my @cits = reverse sort $citations->@*;
    my @data;
    while ( my ( $key, $value ) = each( @cits ) ) {
-   	 push @data, $value if ( $key >= $value );
+   	 push @data, $key if ( $key >= $value );
    }
 
    return ( sort( @data ) )[ 0 ];
diff --git a/challenge-207/luca-ferrari/postgresql/ch-2.sql b/challenge-207/luca-ferrari/postgresql/ch-2.sql
index 5e2e7d5820..a0daf6681a 100644
--- a/challenge-207/luca-ferrari/postgresql/ch-2.sql
+++ b/challenge-207/luca-ferrari/postgresql/ch-2.sql
@@ -17,9 +17,9 @@ BEGIN
 	   SELECT c, row_number() OVER ( ORDER BY c desc ) r
 	   FROM   unnest( citations ) c
 	)
-	SELECT MIN( c )
+	SELECT MIN( r )
 	FROM   d
-	WHERE  c >= r
+	WHERE  r >= c
 	;
 END
 $CODE$
-- 
cgit