# cvs diff -Nup gnu/usr.bin/perl/t/op/array.t
Index: gnu/usr.bin/perl/t/op/array.t
===================================================================
RCS file: /cvs/src/gnu/usr.bin/perl/t/op/array.t,v
retrieving revision 1.10
diff -N -u -p gnu/usr.bin/perl/t/op/array.t
--- gnu/usr.bin/perl/t/op/array.t 29 Sep 2008 17:36:19 -0000
1.10
+++ gnu/usr.bin/perl/t/op/array.t 16 Dec 2009 02:06:10 -0000
@@ -27,7 +27,7 @@ is(join('',@ary), '12345');
$tmp = $ary[$#ary]; --$#ary;
is($tmp, 5);
-# Must do == here beacuse $[ isn't 0
+# Must do == here because $[ isn't 0
ok($#ary == 4);
is(join('',@ary), '1234');
