[DBD::Pg 1/2] Quick demo of utf8::upgrade

[dbdpg-commits]

Committed by Greg Sabino Mullane <g...@endpoint.com>

Subject: [DBD::Pg 1/2] Quick demo of utf8::upgrade

---
 testme.tmp.pl |    2 ++
 1 files changed, 2 insertions(+), 0 deletions(-)

diff --git a/testme.tmp.pl b/testme.tmp.pl
index ade058e..92c9204 100755
--- a/testme.tmp.pl
+++ b/testme.tmp.pl
@@ -69,6 +69,8 @@ sub utf8_print_test {
                        print DPeek $result;
                        print "\n Print with pg_enable_utf8 $onoff: $result\n";
                        warn " Warn with pg_enable_utf8 $onoff: $result\n\n";
+                       utf8::upgrade($result);
+                       print DPeek $result; print "\n\n";
                }
        }
 
-- 
1.7.1