$sth->bind_columns( undef, \$id, \$name, \$title, \$phone );
my $found;
while( $sth->fetch() ) {
  $found++;
  print "$name, $title, $phone\n";
}
print "No matches found!\n" unless $found;
# $sth->finish(); finish() IS NOT NEEDED HERE
[download]