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

<HTML>

<HEAD>

<meta name="GENERATOR" content="Microsoft Internet Assistant for PowerPoint 97">
 <TITLE>Bind those columns!</TITLE> 
</HEAD>

<BODY     >

 <H1>Bind those columns!</H1> 
 <P><UL>
<LI><H2>Compare
</H2>
<UL>
while($row = $sth-&#062fetchrow_arrayref) {
<BR><BR>  print “$row-&#062[0]: $row-&#062[1]\n”;
<BR>}
</UL></UL><UL>
<LI><H2>
</H2>
</UL><UL>
<LI><H2>with
</H2>
<UL>
$sth-&#062bind_columns(\$key, \$value);
<BR><BR>while($sth-&#062fetchrow_arrayref) {
<BR>  print “$key: $value\n”;
<BR>}
<LI>
</UL></UL><UL>
<LI><H2>No row assignment code!
</H2>
</UL><UL>
<LI><H2>No field access code!
</H2>
<UL>
<LI>
</UL></UL><UL>
<H2>      ... just magic
</H2>
</UL></P>
<P></P> 
<P>
<TABLE>
  <TD HEIGHT=100 WIDTH=100> <A HREF="tsld018.htm">Previous slide</A> </TD>
  <TD HEIGHT=100 WIDTH=100> <A HREF="tsld020.htm">Next slide</A> </TD>
  <TD HEIGHT=100 WIDTH=150> <A HREF="tsld001.htm">Back to first slide</A> </TD>
  <TD HEIGHT=100 WIDTH=150> <A HREF="sld019.htm">View graphic version</A> </TD>
</TABLE>
<BR>
</P>



</Body>
</HTML>