Regex Cheat Sheet

Regular Expression examples.

Beispiel für IBE/WFE RecSet

$parseme='AnyString Value="@@||++aa  12" AnyString Value="@@||++bb 12" AnyStringValue="@@||++cc  12"';

my @values = ( $parseme =~ /
                            Value      # this is the 'trigger' of a new value
                            \s*        # might be followed by some spaces
                            =          # mandatory part
                            \s*        # again some possible spaces
                            "          # mandatory, here starts the fun
                            ([^"]*)    # everything till the next "
                            "          # mandatory, end of what we're after
              /smxg  # get all values
);

Beispiel für Spamassassin

regex für Kuerzel oder Kürzel

/^K.{0,2}rzel/i

regex für Sie sparen oder Sie Sparen

if (/Sie [sS]paren/){ ...

---

Wir garantieren, dass Sie schnell bei uns das finden, was Sie suchen! Nur beste Perise fuer alle Mdeikamente
Oder
Wir garantieren, dass Sie schnell bei uns das finden, was Sie suchen! Nur beste Perise fuer alle MeiKamente
Oder
Es war noch nie so einfach so viele gute Pillen zu bestellen! Bei diesen schweren Zeiten braucht man wirklich starke Plilen, um zu ueberleben

if (/(?:garantie|p.{0,4}se)|nie so einfach/i) { ...

if (/(?:m.{0,5}ente)|P.{0,3}len/i) {

---

Sie erhalten Zugang zu mehr als 5 Millionen Deutschen Firmen! Sie können diese Branchenverzeichnisse für E-Mail Marketingkampagnen, Telemarketing oder das Direct Mailing nutzen

if (/(zugang)?[ -]?(deutsche)?[ -]?(firmen)/i) {

if (/(branche|marketing|kampagne)/i) {

---

Ugly Viagra Matrix

V            C            L
I            I            E
G            A            V
R            L            I
A            I            T
             S            R
                          A
$1.29/pill   $1.58/pill   $2.81/pill
+ many other positions!
Visit Us at:
h t t p : / / d r g m e d . c o m    [delete spaces before visiting]

if (/([$][0-9]{1,}|[0-9]{1,}\.[0-9]{1,})\/pill/i){
 print "Talk about Pills\n";
}

if (/C(.*)\nI(.*)\nG(.*)\nR(.*)\nA/i){
 print "Viagra Matrix\n";
}

if (/C(.*)\n\w{1}\s+I(.*)\n\w{1}\s+A(.*)\n\w{1}\s+L/i){
 print "Cialis Matrix\n";
}

Character Class

Account Name: Joe-Fantasy$

m/Account Name:\s*([0-9a-zA-Z_\.\-\$]*)/

Beispiel für Search and Replace

     s/#.*//;             #No Comments #
     s/'.*//;             #No Comments '
     s/^\s+//;            #No leading spaces
     s/\s+$//;            #No trailing spaces
     s/;.*//;             #No Comments ;

$var=~s/^\s+//g;    #no leading spaces in $var