Also, I would recommend you consider using placeholders for all values
passed to your prepare statement.
eg. my $sth = $dbh->prepare('SELECT email_address FROM users WHERE
email_address = ?') || die $dbh->errstr();
$sth->execute($email) || die $dbh->errstr();
but looking at your query I think you would be better off doing:
my $rec = $dbh->selectrow_hashref(<<EOS,{}, $email) || die
$dbh->errstr();
SELECT email_address FROM email_address WHERE email_address = ?
EOS
print $rec->{email_address},$/;
>>>Adriano Ferreira <[EMAIL PROTECTED]> 03/25 7:24 am >>>
>my $sth = $dbh->prepare(SELECT email_address FROM users WHERE
>email_address='[EMAIL PROTECTED]')
>The above line did not work, so the address was not found, guess who
forgot
>to escape the @ !!
If you were using the recommended pragma
use warnings;
at the beginning of the script (or running perl -w), you would have
found earlier that @myisp was being misinterpreted, with a warning
message like this:
Possible unintended interpolation of @myisp in string at ...
Name main::myisp used only once: possible typo at ...
Regards,
Adriano.
