In article <[EMAIL PROTECTED]>,
[EMAIL PROTECTED] (Ron Smith) wrote:
>> >Hello, I need some suggestions regarding stripping email addresses from
> >returned email messages. The addresses are embedded in text files (the
> >email
> >message) without any consistent delimiters
> I don't know how detailed you wanna get with this, but the following will
> return the line in the text file with the address.
> while (<>) {
> open (FILE, "some_file_name");
> print if /@/;
> }
> close FILE;
There is also a nifty module on CPAN which tries its best to
do this:
http://search.cpan.org/doc/MIYAGAWA/Email-Find-0.07/lib/Email/Find.pm
--
brian d foy <[EMAIL PROTECTED]> - Perl services for hire
CGI Meta FAQ - http://www.perl.org/CGI_MetaFAQ.html
Troubleshooting CGI scripts - http://www.perl.org/troubleshooting_CGI.html
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
