REGEX: Capture multiple instances from one line (/g)?

[zackiv31]

I have a variable that contains the html dump of a webpage.. lets call it $html.

I want to extract all the e-mails from it, as well as all the phone numbers.

I don't have a problem with regex's in general.. but if there are more then 1 e-mail or phone number on a line, how do I capture them all? (I know the /g option, but how do i step through each instance..)

I want to end up with two comma seperated lists, one for e-mails, and one for phone numbers.

Example/Pseudo code appreciated.

 

[ishnid]

To capture all matches on a line, you can do this:

my @matches = $string =~ /(regexp for email etc)/g;

 

[zackiv31]

This doesn't work for me:

   if (@phones = $html =~ /(\d{3}).*(\d{3}).*(\d{3})/g){
	foreach (@phones){
	    $data{'PHONE'} = ", $1-$2-$3";
	}
    }

 

[prex1]

while($html=~/(\d{3}).*?(\d{3}).*?(\d{3})/g){
  $data{'PHONE'}.="$1-$2-$3 ,";
}
$data{'PHONE'}=substr($data{'PHONE'},0,-2)if length$data{'PHONE'};

Franco

http://www.xcalcs.com

: Online tools for structural design

http://www.megamag.it

: Magnetic brakes for fun rides

http://www.levitans.com

: Air bearing pads

 

[zackiv31]

That works great prex1... I don't understand the .*?, but it works.

Now if only I could exclude html from being caught in this regex... ?