From: Greg Date: Tue, 2 Jun 2009 00:01:45 +0000 (-0400) Subject: Regex tweak. X-Git-Tag: 2.9.1~29 X-Git-Url: http://git.postgresql.org/gitweb/static/gitweb.js?a=commitdiff_plain;h=6f0332c0e106c65ca7c12d263385a4ff18fcfdb9;p=check_postgres.git Regex tweak. --- diff --git a/check_postgres.pl b/check_postgres.pl index ed877fbc7..a1ca1f241 100755 --- a/check_postgres.pl +++ b/check_postgres.pl @@ -4420,7 +4420,7 @@ sub check_same_schema { . q{FROM pg_proc JOIN pg_namespace n ON (n.oid = pronamespace)}; $info = run_command($SQL, { dbnumber => $x } ); for $db (@{$info->{db}}) { - while ($db->{slurp} =~ /^\s*(.+?)\s+\| (.+?)\s+\| (.+?)\s+\| (.+?)\s+/gmo) { + while ($db->{slurp} =~ /^\s*(.+?)\s+\| (.+?)\s+\| (.+?)\s+\| (.+?)\s*/gmo) { my ($schema,$name,$args,$md5) = ($1,$2,$3,$4); $args =~ s/(\d+)/$thing{$x}{type}{$1}/g; $args =~ s/^\s*(.*)\s*$/($1)/;