perl -p -i -e "s/%{([a-zA-Z0-9._-]+):([a-zA-Z0-9.]+)}/%\$1('\$2')/g" $(git grep -lE '%\{[a-z0-9.-]+:' src/tests/keywords/ src/tests/modules)
test_fail
}
-&Tmp-Integer-0 := %{rand:123}
+&Tmp-Integer-0 := %rand('123')
if (!&Tmp-Integer-0) {
test_fail
# PRE: update if
#
-&Tmp-String-0 := "%{idn:example.com}"
+&Tmp-String-0 := "%idn('example.com')"
&Tmp-String-1 := "%{idn:èxâmpłé.com}"
&Tmp-String-2 := "%{idn:пример.com}"
&Tmp-String-3 := "%{idn:παράδειγμα.com}"
{\
\"foo.bar\": \"baz\" \
}"
-&Tmp-String-2 := "%{taint:foo.bar}"
+&Tmp-String-2 := "%taint('foo.bar')"
map json &Tmp-String-0 {
&Tmp-String-1 := "$.%{Tmp-String-2}"
if (&User-Name == 'test') {
- &User-Password := "%{randstr:bbbbbbbbbbbbbbbb}"
+ &User-Password := "%randstr('bbbbbbbbbbbbbbbb')"
&control.Password.Cleartext := "%{User-Password}"
pap.authorize
# - 127.0.0.1:30005 - slave
# - 127.0.0.1:30003 - master [10923-16383]
# - 127.0.0.1:30006 - slave
-&control.Tmp-String-0 := "1-%{randstr:aaaaaaaa}"
-&control.Tmp-String-1 := "2-%{randstr:aaaaaaaa}"
-&control.Tmp-String-2 := "3-%{randstr:aaaaaaaa}"
+&control.Tmp-String-0 := "1-%randstr('aaaaaaaa')"
+&control.Tmp-String-1 := "2-%randstr('aaaaaaaa')"
+&control.Tmp-String-2 := "3-%randstr('aaaaaaaa')"
# Hashes to Redis cluster node master 1 (1)
if ("%(redis:SET b "%{control.Tmp-String-0}")" == 'OK') {
&Tmp-Integer-0 = 21
}
-&control.Tmp-String-0 := "1-%{randstr:aaaaaaaa}"
-&control.Tmp-String-1 := "2-%{randstr:aaaaaaaa}"
-&control.Tmp-String-2 := "3-%{randstr:aaaaaaaa}"
+&control.Tmp-String-0 := "1-%randstr('aaaaaaaa')"
+&control.Tmp-String-1 := "2-%randstr('aaaaaaaa')"
+&control.Tmp-String-2 := "3-%randstr('aaaaaaaa')"
if ("$ENV{REDIS_CLUSTER_CONTROL}" == '') {
&control.Tmp-String-8 := 'scripts/ci/redis-setup.sh'