--- rxvt-unicode/src/perl/matcher	2014/06/12 12:16:42	1.22
+++ rxvt-unicode/src/perl/matcher	2014/06/12 12:19:09	1.23
@@ -278,7 +278,7 @@
                # It'd be nice to just access a list like ($&,$1,$2...),
                # but alas, m//g behaves differently in list context.
                @exec = map { s/\$(\d+)|\$\{(\d+)\}/
-                  substr $text, $begin[$1 || $2], $end[$1 || $2] - $begin[$1 || $2])
+                  substr $text, $begin[$1 || $2], $end[$1 || $2] - $begin[$1 || $2]
                   /egx; $_ } split /\s+/, $launcher;
             }