Author: richter
Date: Mon Apr 24 11:53:35 2006
New Revision: 396646
URL: http://svn.apache.org/viewcvs?rev=396646&view=rev
Log:
update foreach docs
Modified:
perl/embperl/trunk/Embperl.pod
perl/embperl/trunk/Intro.pod
Modified: perl/embperl/trunk/Embperl.pod
URL:
http://svn.apache.org/viewcvs/perl/embperl/trunk/Embperl.pod?rev=396646&r1=396645&r2=396646&view=diff
==============================================================================
--- perl/embperl/trunk/Embperl.pod (original)
+++ perl/embperl/trunk/Embperl.pod Mon Apr 24 11:53:35 2006
@@ -252,7 +252,7 @@
Example:
[- @arr = (1, 3, 5) -]
- [$ foreach $v @arr $]
+ [$ foreach $v (@arr) $]
[+ $v +] <BR>
[$ endforeach $]
Modified: perl/embperl/trunk/Intro.pod
URL:
http://svn.apache.org/viewcvs/perl/embperl/trunk/Intro.pod?rev=396646&r1=396645&r2=396646&view=diff
==============================================================================
--- perl/embperl/trunk/Intro.pod (original)
+++ perl/embperl/trunk/Intro.pod Mon Apr 24 11:53:35 2006
@@ -543,13 +543,13 @@
<table>
<tr>
- [$ foreach $h @$head $]
+ [$ foreach $h (@$head) $]
<th>[+ $h +]</th>
[$ endforeach $]
</tr>
[$ while $dat = $sth -> fetchrow_arrayref $]
<tr>
- [$ foreach $v @$dat $]
+ [$ foreach $v (@$dat) $]
<td>[+ $v +]</td>
[$ endforeach $]
</tr>
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
