perl-embperl mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From "Gerald Richter" <rich...@ecos.de>
Subject Re: Simple table problem
Date Wed, 03 Dec 2003 12:04:00 GMT
>
> This can be done with $maxcol and $cnt, I have not tested but try
> this:
>

This works with 1.3...

>
> [-
> @array = qw/1 2 3 4 5 6 7 8 9 10/;
> $maxcol = 4;
> -]
> <table>
>     <tr>
>       <td>[+ $array[$cnt] +]</td>
>     </tr>
> </table>

2.0 doesn't support $cnt yet, here write instead the following to get the
same result

       <td>[+ $array[$col + ($row * $maxcnt)] +]</td>

Gerald


--------------------------------------------------------------
Gerald Richter     ecos electronic communication services gmbh
IT-Securitylösungen * dynamische Webapplikationen * Consulting

Post:       Tulpenstrasse 5          D-55276 Dienheim b. Mainz
E-Mail:     richter@ecos.de          Voice:   +49 6133 939-122
WWW:        http://www.ecos.de/      Fax:     +49 6133 939-333
--------------------------------------------------------------
|
|   ECOS BB-5000 Firewall- und IT-Security Appliance: www.bb-5000.info
|
+-------------------------------------------------------------


---------------------------------------------------------------------
To unsubscribe, e-mail: embperl-unsubscribe@perl.apache.org
For additional commands, e-mail: embperl-help@perl.apache.org


Mime
View raw message