develooper Front page | perl.beginners | Postings from February 2002

Re: pattern matching question

Thread Previous
bob ackerman
February 28, 2002 09:32
Re: pattern matching question
Message ID:

On Thursday, February 28, 2002, at 08:37  AM, richard noel fell wrote:

> while (defined($Line=<In2>)){
>   if($Line=~/(\(D\d+\))\s*(\w*)/){
> print "==> $2\n";
> };
> };

disclaimer: i am a rank newbot
if i replace '/w*' with '.*$'
i get desired text.
looks like \w* doesn't do what we expect.
problems with \t in lines?

Thread Previous Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at | Group listing | About