I'm looking for patterns where the sign "%" or the word "percent" are preceded by a group of one or more digits and zero or more spaces.

if( $line =~ /\%|\bpercent\b/i )
{
        if( $line =~ /\d+\s*(\%|\bpercent\b/i )
        {
                # magic happens
        }
}

Am I on the right track here? In the text I'm searching, too many "%" signs are preceded by only "confidential", "***", "[confidential]", "[***]", or other various unhelpful things. I need a better way to screen out the trash and screen in the goodies.

-- Craig


---
avast! Antivirus: Outbound message clean.
Virus Database (VPS): 0616-3, 04/20/2006
Tested on: 4/20/2006 2:30:04 PM
avast! - copyright (c) 1988-2004 ALWIL Software.
http://www.avast.com




_______________________________________________
ActivePerl mailing list
[email protected]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

Reply via email to