Re: Re: Re: Re: Re: pattern matching on a single line

[merlyn]

Uh, hello? I just ran this code:

 
@lines = <DATA>; 
 
@result = map /<.*?>/g, @lines; 
result(1); 

### rest deleted ###

sub result { 
    print"\nResults",pop,"\n"; 
    print "$_\n" for @result; 
    @result = (); 
} 
  
__DATA__ 
aa<[e-mail]>bb<[e-mail]>cc<[e-mail]> 
dd<[e-mail]>ee<[e-mail]>ff<[e-mail]>

and it produced this result, which appears perfectly fine:

Results1
<[e-mail]>
<[e-mail]>
<[e-mail]>
<[e-mail]>
<[e-mail]>
<[e-mail]>
### rest deleted

What part of Sadly your example fails to produce the desired result :-( am I failing to understand?

-- Randal L. Schwartz, Perl hacker

[Vynce]

hm... maybe you missed the fact that he was replying to 85960 (FouRPlaY's) and not to 85938 (yours)

[merlyn]

{sigh} it's been a long day. {grin}

-- Randal L. Schwartz, Perl hacker