Beefy Boxes and Bandwidth Generously Provided by pair Networks
Come for the quick hacks, stay for the epiphanies.
 
PerlMonks  

Regex problems using '|'

by romandas (Pilgrim)
on Jul 22, 2008 at 08:50 UTC ( #699237=perlquestion: print w/replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    foreach my $vulnerabilityText (@records)
    {
        $vulnerabilityText =~ m/Remediation Report\n\n(.+?)\n|^(.+?)\n/;
    ...
    
        print($vulnerabilityName, "\n");
    }
    
  2. or download this
    foreach my $vulnerabilityText (@records)
    {
        $vulnerabilityText =~ m/Remediation Report\n\n(.+?)\n|^(.+?)\n/;
    ...
    
        print($vulnerabilityName, "\n");
    }
    
  3. or download this
    thread-index: AcjoCau17Ri90HMJR8qoukn2A1g7ng==
    MIME-Version: 1.0
    Content-Type: multipart/related;
    ...
    Adobe Reader/Acrobat 8.1.2 and 7.1.0 Update - Acrobat 7.x
    Audit ID:     6242
    <snip>
    
  4. or download this
    'thread-index: AcjoCau17Ri90HMJR8qoukn2A1g7ng==
    MIME-Version: 1.0
    Content-Type: multipart/related;
    ...
    
    Adobe Flash Player Multiple Vulnerabilities - April 2008 - IE
    Audit ID:       6504'
    
  5. or download this
    'Adobe Flash Player Multiple Vulnerabilities - April 2008 - Mozilla/Op
    era
    Audit ID:       6505
    
  6. or download this
    'Adobe Reader/Acrobat 8.1.2 and 7.1.0 Update - Acrobat 7.x
    Audit ID:       6242'
    
  7. or download this
    Adobe Flash Player Multiple Vulnerabilities - April 2008 - IE
    Adobe Flash Player Multiple Vulnerabilities - April 2008 - Mozilla/Ope
    +ra
    Adobe Reader/Acrobat 8.1.2 and 7.1.0 Update - Acrobat 7.x
    
  8. or download this
    thread-index: AcjoCau17Ri90HMJR8qoukn2A1g7ng==
    Adobe Flash Player Multiple Vulnerabilities - April 2008 - Mozilla/Ope
    +ra
    Adobe Reader/Acrobat 8.1.2 and 7.1.0 Update - Acrobat 7.x
    
  9. or download this
    foreach my $vulnerabilityText (@records)
    {
        (($vulnerabilityText =~ m/Remediation Report\n\n(.+?)\s*\n/) or ($
    +vulnerabilityText =~ m/^(.+?)\s*\n/));
        my $vulnerabilityName = $1;
    }
    

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: perlquestion [id://699237]
Approved by marto
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others cooling their heels in the Monastery: (6)
As of 2023-11-28 23:31 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found

    Notices?