[EMAIL PROTECTED] wrote:
> Hi,
>
> I have a string similar to:
> Comment: FILING
>
****-----------------------------------------------------------------------
-****
>
> This is read in as one line (with the page feed).
> I was trying to whatever follows the words and I tried this.
Trying to remove?
>
> if (/(\w+:?\s*\w*:?)+(.*?\*+\s*-+\s*\*+\s*$)/) {
^^
This is no good.
> s/$2//;
> }
>
Would something like this do the trick?
$_ = $1 if /((\s*\w+:?)+)/;
This captures "Comment: FILING"
HTH
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>