Annotation of embedaddon/php/ext/pcre/tests/preg_replace_edit_basic.phpt, revision 1.1.1.1
1.1 misho 1: --TEST--
2: Test preg_replace() function : basic
3: --FILE--
4: <?php
5: /* Prototype : proto string preg_replace(mixed regex, mixed replace, mixed subject [, int limit [, count]])
6: * Description: Perform Perl-style regular expression replacement.
7: * Source code: ext/pcre/php_pcre.c
8: * Alias to functions:
9: */
10:
11: $string = '123456789 - Hello, world - This is a string.';
12: var_dump($string);
13:
14: var_dump(preg_replace('<- This is a string$>',
15: 'This shouldn\'t work', $string)); //tries to find '- This is a string' at the end of a string but can't so replaces nothing and prints the unchanged $string.
16:
17: var_dump(preg_replace('<[0-35-9]>',
18: '4', $string, //finds any number that's not 4 and replaces it with a 4
19: '5', $count)); //limits to 5 replacements returns 444444789
20: var_dump($count); //counts the number of replacements made (5)
21:
22:
23: var_dump(preg_replace('<\b[hH]\w{2,4}>',
24: 'Bonjour', $string)); //finds h or H at the beginning of a word followed by 2-4 characters and replaces it with Bonjour (i.e. Hello -> Bonjour) (was finding the 'his' in This and replacing it)
25:
26: var_dump(preg_replace('<(\w)\s*-\s*(\w)>',
27: '\\1. \\2', $string)); //finds dashes with an indefinate amount of whitespace around them and replaces them with a full stop precedeby no spaces and followed by one space
28:
29: var_dump(preg_replace('<(^[a-z]\w+)@(\w+)\.(\w+)\.([a-z]{2,}$)>',
30: '\\1 at \\2 dot \\3 dot \\4', 'josmessa@uk.ibm.com')); //finds the e-mail address and replaces the @ and . with "at" and "dot" (uses backreferences) ('josmessa at uk dot ibm dot com')
31: ?>
32: --EXPECTF--
33: string(54) "123456789 - Hello, world - This is a string."
34: string(54) "123456789 - Hello, world - This is a string."
35: string(54) "444444789 - Hello, world - This is a string."
36: int(5)
37: string(56) "123456789 - Bonjour, world - This is a string."
38: string(42) "123456789. Hello, world. This is a string."
39: string(30) "josmessa at uk dot ibm dot com"
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>