@@ -105,7 +105,7 @@ sub t_min_reconnect_interval {
105
105
);
106
106
},
107
107
qr / "min_reconnect_interval" must be a positive number/ ,
108
- " invalid ' min_reconnect_interval' (character string; constructor)" ,
108
+ q{ invalid " min_reconnect_interval" (character string; constructor)} ,
109
109
);
110
110
111
111
like(
@@ -115,7 +115,7 @@ sub t_min_reconnect_interval {
115
115
);
116
116
},
117
117
qr / "min_reconnect_interval" must be a positive number/ ,
118
- " invalid ' min_reconnect_interval' (negative number; constructor)" ,
118
+ q{ invalid " min_reconnect_interval" (negative number; constructor)} ,
119
119
);
120
120
121
121
my $redis = AnyEvent::RipeRedis-> new();
@@ -125,15 +125,15 @@ sub t_min_reconnect_interval {
125
125
$redis -> min_reconnect_interval(' invalid' );
126
126
},
127
127
qr / "min_reconnect_interval" must be a positive number/ ,
128
- " invalid ' min_reconnect_interval' (character string; accessor)" ,
128
+ q{ invalid " min_reconnect_interval" (character string; accessor)} ,
129
129
);
130
130
131
131
like(
132
132
exception {
133
133
$redis -> min_reconnect_interval(-5);
134
134
},
135
135
qr / "min_reconnect_interval" must be a positive number/ ,
136
- " invalid ' min_reconnect_interval' (negative number; accessor)" ,
136
+ q{ invalid " min_reconnect_interval" (negative number; accessor)} ,
137
137
);
138
138
139
139
return ;
0 commit comments