my $ctr = 0; for ($ctr = 0; $ctr < 601; $ctr++) { $indexs[$ctr] = "-$ctr-"; } $ctr = 0; print "<html><body><table border=1>"; while ($ctr < 201) { print "<tr><td>"; if ($indexs[$ctr]) { print $indexs[$ctr]; ### first col current row ($ctr) } else { print ' '; } print '</td><td>'; if (($indexs[$ctr + 201]) and ($ctr+201 != 401)) { print $indexs[$ctr + 201]; ### second col current row ($ctr) } else { print ' '; } print "</td><td>"; if ($indexs[$ctr + 401]) { print $indexs[$ctr + 401]; ### third col current row ($ctr) } else { print ' '; } print "</td></tr>\n"; $ctr++; } print "</table></body></htm>\n";
In reply to Re: DBI output in 3 columns
by jlongino
in thread DBI output in 3 columns
by Donzo
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |