getting selected lines from a text file

[Indiainfo]

Hai,
  i am a beginer in perl.

  I have a text file, which contains some mail ids among other text.  Is ther some way 
by which i can extract all the mail-ids into another text?

Thanks in advance

Mony