Front page | perl.beginners |
Postings from February 2002
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