Jemand zu Hause?![[twitter]](/battie/theme/default/icons/twitter.gif){kind=icon}
Leser: 1
 |
|< 1 2 >| |  |
19 Einträge, 2 Seiten |
![[default_avatar]](/battie/theme/default/default_avatar.gif){kind=avatar}
1
2
3
4
Schrift
Blog
Einstellungen![[feed]](/battie/theme/default/icons/feed.png){kind=icon}
$sth = $dbh->prepare(qq{
INSERT INTO tabelle (spalte_1, spalte_2, spalte_3 )
VALUES (?, ?, ?)
});$sth->execute( $wert_1, $wert_2, $wert_3 );
![[Homepage]](/battie/theme/default/homepage.gif)
print $sth->{Statement};
print $sth->{Statement};
Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
QuoteOn Mon, Dec 19, 2005 at 11:47:59PM +0100, module@renee-baecker.de wrote:
> Hi Tim,
>
> is it possible to introduce one new "field" (attribute) for an executed
> statement?
>
> With $sth->{Statement} you just get the "prepared" statement, but if you
> use placeholders and you want to see the executed statement, this is not
> very helpful.
For many databases the placeholders are effectively merged into the
statement on the server, in which case the client may not be able to
produce an SQL statement that matches exactly what the server will do.
(Consider attributes to bind_param() that alter behaviour, for example.)
The ParamValues attribute may be of use to you, if your driver supports
it. See archives for previous discussions on this topic:
http://www.google.com/search?q=ParamValues+bunce
If your driver emulates placeholder itself then it could add a
driver-private attribute that provides the expended statement.
Tim.
1
2
3
4
5
6
my $sql = $sth->{Statement};
for( keys %{$sth->{ParamValues}} )
{
$sql =~ s/\?/$sth->{ParamValues}->{$_}/;
}
1
2
3
4
5
my $sql = $sth->{Statement};
for(sort{$a <=> $b}keys %{$sth->{ParamValues}} ){
$sql =~ s/\?/$sth->{ParamValues}->{$_}/;
}
|
|< 1 2 >| | |
19 Einträge, 2 Seiten |
![[Powered by Battie]](/battie/img/powered.png)
