Use trace() Tim.
On Fri, May 14, 2004 at 04:05:44PM -0300, Pedro Anisio wrote: > Sorry, I didnt send this part of the code > > @param = (2, 343520291, 1); > > >-----MENSAGEM ORIGINAL----- > >De: "Pedro Anisio" <[EMAIL PROTECTED]> > >Enviada em: Sex, 14 Mai 2004 16:02:14 > >Assunto: Res: Res: RE: Problems changing from 1.30 to 1.42 > > > > > >>I dont get any error on $msg but the UPDATE is not executed and the values on my > >>database dont' change. > > > >Pedro > > > >>-----MENSAGEM ORIGINAL----- > >>De: "Reidy, Ron" > >>Enviada em: Sex, 14 Mai 2004 15:59:25 > >>Assunto: Res: RE: Problems changing from 1.30 to 1.42 > >> > >> > >>>What is your error? > >> > >>----------------- > >>Ron Reidy > >>Senior DBA > >>Array BioPharma, Inc. > >> > >>-----Original Message----- > >>From: Pedro Anisio [mailto:[EMAIL PROTECTED] > >>Sent: Friday, May 14, 2004 12:57 PM > >>To: [EMAIL PROTECTED] > >>Subject: Problems changing from 1.30 to 1.42 > >> > >>Guys, > >> > >> I'm migrating my system from DBI 1.30 to 1.42 but I found onte little problem, > >> this piece off code used to worked at 1.30 but now it simple don't do this > >> update, unless I pass the update values directlty on the $query. What is causing > >> this? Anyone can help-me? > >> > >>#!/usr/bin/perl > >> > >>use DBI; > >> > >>$query = "update mensagem set mens_stat = ? where mens_codigo = ? and mens_stat > >>= ?"; > >>#$query = "update mensagem set mens_stat = 2 where mens_codigo = 343520291 and > >>mens_stat = 1"; prepare($query); > >> > >> if (!$sth->execute(@param)) > >> { > >> $msg = $sth->errstr; > >> $msg =~ s/\n|\r/ /g; > >> $msg .= "[$query], ".join(",",@param); > >> } > >> > >>print "$msg\n"; > >> > >>$sth->finish; > >>$dbh->disconnect; > >> > >>exit; > >> > >>Abra?os, > >> > >>Pedro An?sio > >> > >>* iBest. Internet gr?tis com qualidade de internet paga. > >> > >>Clique abaixo para conectar-se ? internet gratuitamente: > >>http://discador.ibest.com.br/mail.html > >> > >>This electronic message transmission is a PRIVATE communication which contains > >>information which may be confidential or privileged. The information is intended > >>to be for the use of the individual or entity named above. If you are not the > >>intended recipient, please be aware that any disclosure, copying, distribution > >>or use of the contents of this information is prohibited. Please notify the > >>sender of the delivery error by replying to this message, or notify us by > >>telephone (877-633-2436, ext. 0), and then delete it from your system. > >> > >> > > > >Abra?os, > > > >Pedro An?sio > > > >* iBest. Internet gr?tis com qualidade de internet paga. > > > >Clique abaixo para conectar-se ? internet gratuitamente: > >http://discador.ibest.com.br/mail.html > > > > Abra?os, > > Pedro An?sio > > > > > * iBest. Internet gr?tis com qualidade de internet paga. > > Clique abaixo para conectar-se ? internet gratuitamente: > http://discador.ibest.com.br/mail.html >
