Sorry, forgot:
sub escape_bytea { my ($instring)[EMAIL PROTECTED]; 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 <[EMAIL PROTECTED] To: [EMAIL PROTECTED], pgsql-general@postgresql.org om> cc: Sent by: Subject: Re: [GENERAL] UTF-8 context of BYTEA datatype?? |-------------------| [EMAIL PROTECTED] | [ ] Expand Groups | tgresql.org |-------------------| 05/30/2006 10:06 AM On Tue, 2006-05-30 at 09:05 -0700, [EMAIL PROTECTED] 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 ---------------------------------------------------------------------------------------------- ---------------------------(end of broadcast)--------------------------- TIP 1: if posting/reading through Usenet, please send an appropriate subscribe-nomail command to [EMAIL PROTECTED] so that your message can get through to the mailing list cleanly