RE: simple file question

[McDonald Patrick]

Write your print statement like this

if /$email2/o
{
   print FILE2;
}

-----Original Message-----
From: Chris Zampese [mailto:[EMAIL PROTECTED]]
Sent: Tuesday, January 29, 2002 9:18 PM
To: perl list
Subject: Re: simple file question


Just found a regex in the docs.  I now have this...

  while (<FILE2>) {
        print if /$email2/o;
    }

but I am still not sure how to print to  the file??

----- Original Message -----
From: "Chris Zampese" <[EMAIL PROTECTED]>
To: "perl list" <[EMAIL PROTECTED]>
Sent: Wednesday, January 30, 2002 3:10 PM
Subject: simple file question


Hello everyone,
   I have a variable $myvar (an email address), and I would like to open a
simple text file which contains email addresses (one on each line) and check
to see if the address in $myvar is in there, if it is not, then append it o
the end of the file, and if it is, then close the file and carry on with the
rest of the script.
  I have tried using while (<FILEHANDLE>){},
 but I am not really sure what to put in the brackets?

Thanks as always,
                     Chris.


--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]




-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]