SELECT $dbh,
     ":name, :email from ... where DIAPER=?",
     'soft and absorbant'
{
    print "$name < $email >\n";
}

##</code><code>##

SELECT $dbh,
     " :name, :email
      from ...
      where
        DIAPER LIKE ?
      ",
     'soft and absorbant'
{
    print "$name < $email >\n";
}

##</code><code>##

SELECT $dbh,
     ":name, :email from ... where DIAPER=?",
     'soft and absorbant'   {
    print "$name < $email >\n";
}

##</code><code>##

SELECT $dbh,
     " :name, :email
      from ...
      where
        DIAPER LIKE ?
      ",
     'soft and absorbant'   {
    print "$name < $email >\n";
}

##</code><code>##

$dbh->SELECT
     ":name, :email from ... where DIAPER=?",
     'soft and absorbant'
{
    print "$name < $email >\n";
}

##</code><code>##

$dbh->SELECT
     " :name, :email
      from ...
      where
        DIAPER LIKE ?
      ",
     'soft and absorbant'
{
    print "$name < $email >\n";
}

##</code><code>##

$dbh->SELECT(
     ":name, :email from ... where DIAPER=?",
     'soft and absorbant',
sub {
    print "$name < $email >\n";
});

##</code><code>##

$dbh->SELECT(
     " :name, :email
      from ...
      where
        DIAPER LIKE ?
      ",
     'soft and absorbant',
sub {
    print "$name < $email >\n";
} );

##</code><code>##


for my $quality ( 'soft', 'absorbant' ){
    SELECT ":rec{name}, :rec{email} from ... where DIAPER=?", $quality {
        print "$rec{name} < $rec{email} >\n";
    }
}

##</code><code>##

for my $quality ( 'soft', 'absorbant' ){
    SELECT ":{name}, :{email} from ... where DIAPER=?", $quality {
        print "$rec{name} < $rec{email} >\n";
    }
}

##</code><code>##

{
    my %rec = (
        name => undef,
        email => undef,
    );
# line 3 foo.pl
    my $sth = $dbh->prepare( "SELECT name, email from ... where DIAPER=?" );
# line 3 foo.pl
    $sth->execute( $quality );
    
    $sth->bind_col(1, \$rec{name});
    $sth->bind_col(2, \$rec{email});
    
    while( $sth->fetchrow_arrayref ){
# line 4 foo.pl
        print "$rec{name} < $rec{email} >\n";
    }
}
# line 7 foo.pl