---

jeg har f.eks.

my $sth = $tmp->prepare("UPDATE $table SET ID=?, lTime=now(), TIP=?, ALne=?,
Sm=?, SHs=?, SR=?, Su=?, RT=?, TC=? WHERE MID = ?");
$ra = $sth->execute($a, $b, $c, $d, $e, $f, qq{$g}, $h, $i, $j);

Der er tilsyneladende omkring 10% af mine updates som ikke bliver kørt
korrekt. Jeg ønsker derfor at debugge og udskrive $sth til skærm. Har
forsøgt med

print $sth;

Som ikke giver noget resultat

Synes ikke http://search.cpan.org/~timb/DBI/DBI.pm eller diverse how-to's
kan hjælpe mig?

Nogen der ved hvordan man gør?

--
Mvh

---

On Fri, 4 Jun 2004 10:01:44 +0200, mic wrote:

> Har forsøgt med

> print $sth;

> Som ikke giver noget resultat

Har du prøvet Data::Dumper?

<http://search.cpan.org/~ilyam/Data-Dumper-2.121/Dumper.pm>


Mvh.

--
"I carry it over my shoulder like a lance Adam Sjøgren
A pole with a banner sayin'; T-To-Tolerance!!" asjo@koldfront.dk

---

"mic" <maskinen@hotmail.com> writes:

> jeg har f.eks.
>
> my $sth = $tmp->prepare("UPDATE $table SET ID=?, lTime=now(), TIP=?, ALne=?,
> Sm=?, SHs=?, SR=?, Su=?, RT=?, TC=? WHERE MID = ?");
> $ra = $sth->execute($a, $b, $c, $d, $e, $f, qq{$g}, $h, $i, $j);
>
> Der er tilsyneladende omkring 10% af mine updates som ikke bliver kørt
> korrekt. Jeg ønsker derfor at debugge og udskrive $sth til skærm. Har
> forsøgt med
>
> print $sth;
>
Det vil næppe hjælpe dig, da $sth kun indeholder diverse interne
datastrukturer til brug for driveren.

Du skal nok huske at benytte $dbh->{RaiseError}=1 og evt også
$dbh->{ShowErrorStatement}=1 (se i 'perldoc DBI' under connect for en
anvisning i hvordan du sætter dem) - det vil nok kunne fortælle dig
hvor, hvorfor og hvordan dine fejl opstår.

--
mvh
Henrik Tougaard.