email formatting

[simonbell]

Hi

could someone give me an example of how i could check is the format of an email address entered is correct. Ive been looking at the regexp page but i cant seem to figure it out.

thanks
Simon

[Wcc]

Code: Select all

if {[regexp {.+@.+\..+} <text>]} { valid }

Wcc

[egghead]

Hi

could someone give me an example of how i could check is the format of an email address entered is correct. Ive been looking at the regexp page but i cant seem to figure it out.

thanks
Simon

If you want to go beyond a one line regexp, you may end up writing an interesting tcl which does:

1. check if the email address is formatted according RFC 822.
2. check if a mail host for the address exists.

Perl modules exist for this functionality. An example:

http://aspn.activestate.com/ASPN/CodeDo ... Valid.html

If you find or write such a module in tcl, let it know!