Add test for RT #122349

Raku · Jul 21, 2014 · 8a43069 · 8a43069
1 parent dc1d29b
commit 8a43069
Showing 1 changed file with 6 additions and 1 deletion.
diff --git a/S05-substitution/subst.t b/S05-substitution/subst.t
@@ -2,7 +2,7 @@ use v6;
 
 use Test;
 
-plan 140;
+plan 141;
 
 # L<S05/Substitution/>
 
@@ -433,6 +433,11 @@ is '12'.subst(/(.)(.)/,{$()*2}),'24', '.. and do nifty things in closures';
     is($RT119201_m, 'a', 'get match variable in replacement of subst-mutator');
 }
 
+# RT #122349
+{
+    eval_lives_ok '$_ = "a";s/a$/b/;s|b$|c|;s!c$!d!;', '$ anchor directly at the end of the search pattern works';
+}
+
 done;
 
 # vim: ft=perl6