Sorry, forgot: sub escape_bytea { my ($instring)=@_; my $returnstring=join ('',map { my $tmp=ord($_); ($tmp >= 32 and $tmp <= 126 and $tmp != 92) ? $_ : sprintf('\%03o',$tmp);} split (//,$instring)); return $returnstring; } # end sub escape_bytea Rafal Pietrak <rafal@xxxxxxxxxxxxxxxx To: SCassidy@xxxxxxxxxxxxxxxxxxx, pgsql-general@xxxxxxxxxxxxxx om> cc: Sent by: Subject: Re: [GENERAL] UTF-8 context of BYTEA datatype?? |-------------------| pgsql-general-owner@pos | [ ] Expand Groups | tgresql.org |-------------------| 05/30/2006 10:06 AM On Tue, 2006-05-30 at 09:05 -0700, SCassidy@xxxxxxxxxxxxxxxxxxx wrote: > Did you try escaping the data: > my $rc=$sth->bind_param(1, escape_bytea($imgdata), { pg_type => > DBD::Pg::PG_BYTEA }); No. But: $ ./test Undefined subroutine &main::escape_bytea called at ./test line 34. Where can I find one? $ grep -Rl escape_bytea /usr/share/perl* /usr/lib/perl* ... returns nothing. Neither is listed among: psql>\df output. Where should I look for it? -- -R ---------------------------(end of broadcast)--------------------------- TIP 3: Have you checked our extensive FAQ? http://www.postgresql.org/docs/faq ---------------------------------------------------------------------------------------------- Simply protected storage solutions ensure that your information is automatically safe, readily available and always there, visit us at http://www.overlandstorage.com ----------------------------------------------------------------------------------------------