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