use Perl

• PostgreSQL (Score:2)

  by Theory (10)

  On a plus note, postgresql rocks.

  Ooh, on that note, you might be just the guy to help me write a new PostgreSQL driver. I haven't had the time to work on it in a few weeks, but I'm hoping to get back to it soon...

  --David
  • Re:PostgreSQL (Score:1)

    by Dom2 (2981)

    I noticed you'd just released the new DBD::Pg. Any idea when it'll support setting the UTF-8 flag on returned data? This was and is a large annoyance...

    Alternatively, any idea how hard it would be to add in myself? I haven't looked at the source yet...

    -Dom
    • Re:PostgreSQL (Score:1)

      by Theory (10)

      If you build your database with --enable-multibyte and create the database with -E UNICODE, doesn't it just work?

      --David
      • Re:PostgreSQL (Score:1)

        by Dom2 (2981)

        Nope, I get doubly-encoded UTF8 because the data returned from the fetch isn't marked with Perl's UTF8 flag. Here's a test script:

        #!/usr/bin/perl -w
        
        use strict;
        use warnings;
        
        use 5.008;
        
        use charnames ':full';
        
        use DBI;
        
        my $dbh =
            DBI->connect( 'dbi:Pg:dbname=dom', 'dom', 'dom',
            { AutoCommit => 1, RaiseError => 1 } );
        
        binmode( STDOUT, ':utf8' );
        if ($ARGV[0] && $ARGV[0] eq 'setup' ) {
            $dbh->do( 'CREATE TABLE test ( name text )' );
            my $sth
        • Re:PostgreSQL (Score:2)

          by Theory (10) on 2002.12.17 14:15 (#15476) Homepage Journal

          This works perfectly for me:

          mercury% try
          name: fred
          name: barney
          name: Ädam

          Are you sure that PostgreSQL is compiled with --enable-multibyte? Try adding use utf8;. (Perhaps we should move this discussion to dbi-users@perl.org.)

          --David

          Reply to This

          Parent