Beefy Boxes and Bandwidth Generously Provided by pair Networks
Welcome to the Monastery
 
PerlMonks  

Making a regex case insensitive

by Win (Novice)
on Mar 06, 2007 at 18:13 UTC ( #603475=perlquestion: print w/replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    
    if ( $_ =~ /$(--|;|DELETE\s|DROP\s|UPDATE\s|EXEC\s|INSERT\s|CREATE\s|d
    +elete\s|drop\s|update\s|exec\s|insert\s|create\s)/ ) {
    ...
        die;
          }
    
  2. or download this
      if ( $_ =~ /$(--|;|DELETE\s|DROP\s|UPDATE\s|EXEC\s|INSERT\s|CREATE\s
    +)/i ) {
        
        die;
          }
    

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others chanting in the Monastery: (3)
As of 2022-11-29 04:54 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    Notices?