Ticket #2671: test_Split.au3

File test_Split.au3, 1.2 KB (added by mlipok, on Mar 14, 2014 at 1:29:35 PM)
Line 
1#include <Array.au3>
2Local $sData1 = "0AB1Ab2aB3ab4Ab5AB6"
3
4Local $aTest1 = StringSplit($sData1, 'ab', 1)
5_ArrayDisplay($aTest1, '$aTest1')
6#cs Current AutoIt 3.3.11.3 Results :
7 Row|Col 0
8 [0]|2
9 [1]|0AB1Ab2
10 [2]|3
11#CE
12#CS expected result :
13 Row|Col 0
14 [0]|2
15 [1]|0AB1Ab2aB3
16 [2]|4Ab5AB6
17#CE
18
19Local $aTest2 = StringSplit($sData1, 'aB', 1)
20_ArrayDisplay($aTest2, '$aTest2')
21#CS Current AutoIt 3.3.11.3 Results :
22 Row|Col 0
23 [0]|2
24 [1]|0AB1Ab2
25 [2]|3
26#CE
27#CS expected result :
28 Row|Col 0
29 [0]|2
30 [1]|0AB1Ab2
31 [2]|3ab4Ab5AB6
32#CE
33
34Local $aTest3 = StringSplit($sData1, 'Ab', 1)
35_ArrayDisplay($aTest3, '$aTest3')
36#CS Current AutoIt 3.3.11.3 Results :
37 Row|Col 0
38 [0]|3
39 [1]|0
40 [2]|1
41 [3]|2aB3ab4
42#CE
43#CS expected result :
44 Row|Col 0
45 [0]|3
46 [1]|0AB1
47 [2]|2aB3ab4
48 [3]|5AB6
49#CE
50
51Local $aTest4 = StringSplit($sData1, 'AB', 1)
52_ArrayDisplay($aTest4, '$aTest4')
53#CS Current AutoIt 3.3.11.3 Results :
54 Row|Col 0
55 [0]|3
56 [1]|0
57 [2]|1
58 [3]|2aB3ab4
59#CE
60#CS expected result :
61 Row|Col 0
62 [0]|3
63 [1]|0
64 [2]|1Ab2aB3ab4Ab5
65 [3]|6
66#CE
67