Jeffrey is trying very hard to avoid working on his

[perl5.git] / lib / overload.t

diff --git a/lib/overload.t b/lib/overload.t
index f98f0c4..d075062 100644 (file)
--- a/lib/overload.t
+++ b/lib/overload.t
@@ -729,7 +729,7 @@ else {
   $iter = iterator->new(5);
   test scalar <${iter}>, '5';  # 176
   $acc = '';
-  $acc .= " $out" while $out = <${iter}>;
+  $acc .= " $out" while $out = <$iter>;
   test $acc, ' 4 3 2 1 0';     # 177
 }
 {