Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl-Sensitive Sunglasses
 
PerlMonks  

Re: Wondering novice...

by plaid (Chaplain)
on Mar 28, 2000 at 21:26 UTC ( #6338=note: print w/replies, xml ) Need Help??


in reply to Wondering novice...

Any of the answers above are the correct ways to go about it, but on a side note, I just thought i'd add a comment about debugging code. It's easy to see from the original code that the condition if ($emailaddr eq $email) isn't at fault, so a good thing to do might be to go into the else and add a statement such as
print "-$emailaddr- ne -$email-\n"
This could be helpful in the beginning before there are too many email addresses in the database, and the hyphens around each of the variables could help track down hard to find differences such as whitespace. If this is a CGI script, you can instead print to STDERR and check your server's error log.

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://6338]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others studying the Monastery: (5)
As of 2022-05-25 20:29 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    Do you prefer to work remotely?



    Results (90 votes). Check out past polls.

    Notices?