DBIx::ShowCaller a split()

Jan Kasprzak kas na fi.muni.cz
Úterý Březen 14 10:33:27 MET 2006


Honza Pazdziora wrote:
: On Mon, Mar 13, 2006 at 10:53:44PM +0100, Jan Kasprzak wrote:
: > 
: > use strict;
: > 
: > use DBIx::ShowCaller;
: > # use DBI;
: > my $dbh = DBIx::ShowCaller->connect('dbi:Oracle:', 'dbuser', 'dbpass')
: > # my $dbh = DBI->connect('dbi:Oracle:', 'dbuser', 'dbpass')
: >         or die;
: > 
: > my $temp_file = "/tmp/docasny.txt";
: > 
: > open(TEMP, $temp_file) or die "Soubor $temp_file nelze otevrit: $!\n";
: > my $text = join('',<TEMP>);
: > close TEMP;
: 
: Kdyz semka das
: 
: 	$dbh->trace(9);
: 

	No, a co chces videt? Krome ruznych hexa cisel a rozdilu
DBI::* versus DBIx::ShowCaller::* to ma (pokud dobre
vidim) v obou pripadech (uspesnem i neuspesnem) podobnou strukturu,
a zacne se to lisit u

      dbd_st_fetch 1 fields SUCCESS
          0 (rc=0): '1'
      dbd_st_finish
          OCIStmtFetch(82c3588,82bb6dc,0,2,0)=SUCCESS
-     <- selectrow_array= ( '1' ) [1 items] at /tmp/n.pl line 24
+     <- selectrow_array= ( ) [-15307 items] at /tmp/n.pl line 24

	Cili ze fetch vrati co ocekavam, ale selectrow_array uz ne.
Oba trace soubory jsou na

http://www.fi.muni.cz/~kas/tmp/trace.fail.txt
http://www.fi.muni.cz/~kas/tmp/trace.ok.txt

-Y.

-- 
| Jan "Yenya" Kasprzak  <kas at {fi.muni.cz - work | yenya.net - private}> |
| GPG: ID 1024/D3498839      Fingerprint 0D99A7FB206605D7 8B35FCDE05B18A5E |
| http://www.fi.muni.cz/~kas/    Journal: http://www.fi.muni.cz/~kas/blog/ |
> Specs are a basis for _talking_about_ things. But they are _not_ a basis <
> for implementing software.                              --Linus Torvalds <


Další informace o konferenci Perl