Beefy Boxes and Bandwidth Generously Provided by pair Networks
laziness, impatience, and hubris

Re: Parse file for email address

by RyuMaou (Deacon)
on Jan 22, 2010 at 15:31 UTC ( #818978=note: print w/replies, xml ) Need Help??

in reply to Parse file for email address

Have you looked in the Code Catacombs? There are a couple of scripts in there for finding e-mail in files. I know because I wrote them. They're not perfect, and I'm not sure if they'll be faster or slower than anything you've already tried, but it might be a place to start.

(I will warn you, though, I'm a Network Admin, not a Perl Programmer, so the code reflects the, um, "utilitarian" nature of the effort and the speed with which I needed a solution.)

Replies are listed 'Best First'.
Re^2: Parse file for email address
by sri1230 (Novice) on Jan 22, 2010 at 16:14 UTC
    Thank you both. The file are larger and i have many that get processed ina loop. It takes forever to check line by line. I also tried to look in Code Catacombs did not find anything that does what i am looking for. Please let me know if you have any other thoughts. Basically i would like to LWP "get" a web page and look for the first valid email address in the web page source.
      Oh, from the description of your initial question, I thought you had the files already, which is what my scripts were all about doing. Though, there is one in there for verifying the e-mail addresses after they've been gathered.

      What you're talking about, though, is an e-mail harvester. Because so many spammers use them, I doubt too many people are going to be willing to help with that.
      Good luck, though, and be sure to post your results for everyone to see!

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://818978]
[marto]: good morning all

How do I use this? | Other CB clients
Other Users?
Others having an uproarious good time at the Monastery: (8)
As of 2018-06-20 08:38 GMT
Find Nodes?
    Voting Booth?
    Should cpanminus be part of the standard Perl release?

    Results (116 votes). Check out past polls.