note
tachyon
<p>Your guess about a table is spot on.....
<code>
my $err = join "\n", map { "Error $_<br>" } 0..100;
my @errs = split /<br>\s*/, $err;
$err = qq!<table width="100%">\n!;
for ( my $i=0; $i<@errs; $i+=3 ) {
$err .= sprintf "<tr><td>%s</td><td>%s</td><td>%s</td></tr>\n",
map { defined $_ ? $_ : '' } @errs[$i..$i+2];
}
$err .= "</table>\n";
print $err;
</code>
<p>You could save yourself the split by simply pushing the errors into the @errs array in the first place.
<!-- Node text goes above. Div tags should contain sig only -->
<div class="pmsig"><div class="pmsig-80749">
<p>cheers
<p><font color="#0000ff">tachyon</font>
</div></div>
409793
409793