17 + 5 is not 23 (:

Tadeusz Sośnierz · Tadeusz Sośnierz · commit f8adce30dd20 · 2011-02-20T15:01:47.000+01:00
diff --git a/S02-names/identifier.t b/S02-names/identifier.t
@@ -81,7 +81,7 @@ plan 20;
     my ($x);
     sub my($a) { $a + 17 }
     $x = 5;
-    is my($x), 23, 'call to sub named "my" works';
+    is my($x), 22, 'call to sub named "my" works';
 }
 
 # RT #77218

Original file line number	Diff line number	Diff line change
`@@ -81,7 +81,7 @@ plan 20;`
`81`	`81`	`my ($x);`
`82`	`82`	`sub my($a) { $a + 17 }`
`83`	`83`	`$x = 5;`
`84`		`- is my($x), 23, 'call to sub named "my" works';`
	`84`	`+ is my($x), 22, 'call to sub named "my" works';`
`85`	`85`	`}`
`86`	`86`
`87`	`87`	`# RT #77218`