Admin: /* Character Class */

2023-12-28T20:22:06Z

Character Class

← Older revision		Revision as of 20:22, 28 December 2023
Line 92:		Line 92:
	if ($QUERY_STRING=~/&selector_title_1=([0-9a-zA-Z_%\s\$]*)/) {		if ($QUERY_STRING=~/&selector_title_1=([0-9a-zA-Z_%\s\$]*)/) {
	print "match $1\n";		print "match $1\n";
			}

			*Date 2023-12-28 19:00:00
			if (/^([0-9\-])\s{1}([0-9\:])\s{1}/) { #2023-12-28 19:00:00
			print "==>>$1 $2 ==>> $_\n";
	}		}

Admin: /* Character Class */

2022-12-22T16:57:16Z

Character Class

← Older revision		Revision as of 16:57, 22 December 2022
Line 86:		Line 86:

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

			*&selector_title_1=10%20Weeks&selector_1=604800&&change_selector_2=1M
			*Looking for '''10%20Weeks'''
			my $QUERY_STRING="&selector_title_1=10%20Weeks&selector_1=604800&&change_selector_2=1M";
			if ($QUERY_STRING=~/&selector_title_1=([0-9a-zA-Z_%\s\$]*)/) {
			print "match $1\n";
			}

	=Beispiel für Search and Replace=		=Beispiel für Search and Replace=

Admin: Created page with "Regular Expression examples. =Beispiel für IBE/WFE RecSet= $parseme='AnyString Value="@@||++aa 12" AnyString Value="@@||++bb 12" AnyStringValue="@@||++cc 12"'; my @val..."

2020-11-27T18:17:00Z

Created page with "Regular Expression examples. =Beispiel für IBE/WFE RecSet= $parseme='AnyString Value="@@||++aa 12" AnyString Value="@@||++bb 12" AnyStringValue="@@||++cc 12"'; my @val..."

New page

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

Regex Cheat Sheet - Revision history

Admin: /* Character Class */

Admin: /* Character Class */

Admin: Created page with "Regular Expression examples. =Beispiel für IBE/WFE RecSet= $parseme='AnyString Value="@@||++aa 12" AnyString Value="@@||++bb 12" AnyStringValue="@@||++cc 12"'; my @val..."