in reply to Regex help

The /g modifier makes the regexp match all matches in that line, returning a list of all the matches. If capturing parens are used, the captured pieces are returned in the list, rather than the entire match.

Try this little bit of code: 
my @extracted = ();
open(FILE, $file) or &error;
while (<FILE>){
  push @extracted, (/(foo\d+)/g);
}

[download]
Update: Those .*? in your match are really unnecessary since you're using the /g modifier. So, I removed them to speed things up.
Updated again for semantics. Thanks, japhy

Replies are listed 'Best First'.
Re: Re: Regex help
by japhy (Canon) on Jul 08, 2002 at 19:26 UTC
    The /g modifier doesn't return anything, nor does a pattern match return an array. The /g modifier makes a regex match globally, so that a pattern match in list context returns a LIST of all matches (either the match itself or the $DIGIT variables). In scalar context, you can step through the matches one at a time.

    _____________________________________________________
    Jeff[japhy]Pinyan: Perl, regex, and perl hacker, who'd like a job (NYC-area)
    s++=END;++y(;-P)}y js++=;shajsj<++y(p-q)}?print:??;

[reply]

In Section Seekers of Perl Wisdom