The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

<!--  Presentation generated by Internet Assistant for Microsoft PowerPoint 97 -->

<HTML>
<HEAD>

<meta name="GENERATOR" content="Microsoft Internet Assistant for Microsoft PowerPoint 97">
 <TITLE>Enabling tracing</TITLE> 
</HEAD>

<BODY     >

<CENTER>
<TABLE WIDTH=100%> 
     <TR> <TD WIDTH=100% ALIGN=CENTER>
         <A HREF="sld001.htm">First</A>&nbsp;&nbsp;
         <A HREF="sld050.htm">Previous</A>&nbsp;&nbsp;
         <A HREF="sld052.htm">Next</A>&nbsp;&nbsp;
         <A HREF="sld080.htm">Last</A>&nbsp;&nbsp;
&nbsp;&nbsp;         <A HREF="index.htm">Index</A>&nbsp;&nbsp;
         <A HREF="http://dbi.perl.org">Home</A>&nbsp;&nbsp;
         <A HREF="tsld051.htm">Text</A>&nbsp;&nbsp;
     </TD> </TR>
     <TR> <TD WIDTH=100% ALIGN=CENTER>
         <IMG SRC="img051.gif" usemap="#Objmap" WIDTH=800 HEIGHT=600 BORDER=0>
     </TD> </TR>
</TABLE>
<P>Slide 51 of 80</P>
</CENTER>
<!-- <UL>
<H2>Enabling tracing</H2>
</UL></P>
<P><UL>
<LI><H2>Per handle
</H2>
<UL>
$h-&#062trace($level);
<BR><BR>$h-&#062trace($level, $filename);
</UL><LI>Only effects that handle and any new child handles created from it
<LI>Child handles get trace level of parent in effect at time of creation
</UL><UL>
<LI><H2>Global (internal to application)
</H2>
<UL>
DBI-&#062trace(...);
<BR></UL><LI>Sets effective global default minimum trace level
</UL><UL>
<LI><H2>Global (external to application)
</H2>
<UL>
<LI>Enabled using DBI_TRACE environment variable
<UL>
DBI_TRACE=digits		  DBI-&#062trace(digits);
<BR><BR>DBI_TRACE=filename		  DBI-&#062trace(2, filename);
<BR>DBI_TRACE=digits=filename	  DBI-&#062trace(digits, filename);</UL></UL></UL></P>
<P>  -->
</Body>
</HTML>