pass the check?
Because the () atomize the first part of your regex and then the ? is
asking for 0 or 1 of that atom.
Droping the ()?: /^(http|ftp):\/\/.+$/
Or, more redable: m!^(http|ftp)://.+$!
And a little shorter: m!^(ht|f)tp://.+$!
HTH,
Roberto Ruiz
--
To unsubscribe, e-mail: [EMAI
Ops, forgot to change blank for \s in regexp:
On Tue, May 28, 2002 at 11:34:09AM -0500, Roberto Ruiz wrote:
> Hi, God bless you.
>
> > while($line = )
> > {
> > if ($line =~ /^email\saddress:\s*/)
^^ also change this.
> > {
Se
o, to check if it is a valid email address
you may want to check the module Mail::Address (perldoc Mail::Address).
See you
Roberto Ruiz
--
A train stops at a train station; a bus stops at a bus station; on my
desk I have a workstation...
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
