perlfaq4: How do I process/modify each element of an array?

[_brian_d_foy]

Joe Schaefer points out that values() now works in this case.


Index: perlfaq4.pod
===================================================================
RCS file: /cvs/public/perlfaq/perlfaq4.pod,v
retrieving revision 1.21
diff -u -d -r1.21 perlfaq4.pod
--- perlfaq4.pod        6 May 2002 13:08:46 -0000       1.21
+++ perlfaq4.pod        13 May 2002 15:52:29 -0000
@@ -1397,9 +1397,10 @@
     }
 
 If you want to do the same thing to modify the values of the hash,
-you may not use the C<values> function, oddly enough.  You need a slice:
+you can use the C<values> function.  The values are not copied,
+so if you modify $orbit (in this case), you modify the value.
 
-    for $orbit ( @orbits{keys %orbits} ) {
+    for $orbit ( values %orbits ) {
        ($orbit **= 3) *= (4/3) * 3.14159; 
     }