From: Greg Sabino Mullane <greg@endpoint.com>
Date: Mon, 4 Jul 2011 14:01:57 +0000 (-0400)
Subject: printf fixes.
X-Git-Tag: 2.18.0~27
X-Git-Url: http://git.postgresql.org/gitweb/?a=commitdiff_plain;h=5f9eac01e750764f072f33ee9f0efb6cc584b5ba;p=check_postgres.git

printf fixes.
---

diff --git a/check_postgres.pl b/check_postgres.pl
index d98e98945..6a8863e7b 100755
--- a/check_postgres.pl
+++ b/check_postgres.pl
@@ -1597,7 +1597,8 @@ sub finishup {
                 or ($DEBUGOUTPUT =~ /u/io and $type eq 'u');
         }
         for (sort keys %$info) {
-            printf "$_ %s%s ",
+            printf "%s %s%s ",
+                $_,
                 $showdebug ? "[DEBUG: $DEBUG_INFO] " : '',
                 join $SEP => map { $_->[0] } @{$info->{$_}};
         }
@@ -6410,10 +6411,10 @@ sub write_audit_file {
     print {$fh} "## Port: $row->{port}\n";
     print {$fh} "## User: $row->{dbuser}\n";
     if ($arg->{same_schema}) {
-        printf {$fh} "## Start of same_schema information:\n";
+        print {$fh} "## Start of same_schema information:\n";
         {
             local $Data::Dumper::Indent = 1;
-            printf {$fh} Dumper $info;
+            print {$fh} Dumper $info;
         }
         print {$fh} "## End of same_schema information\n";
     }