version 1.31, 2003/10/10 21:45:34
|
version 1.32, 2003/10/10 21:49:20
|
Line 133 sub DoTriesAnalysis {
|
Line 133 sub DoTriesAnalysis {
|
} |
} |
# |
# |
# Build up the table of row labels. |
# Build up the table of row labels. |
my @Rows; |
|
$Rows[0]= [ '<th>'.&mt('Foil Number').'</th>', |
|
'<th>'.&mt('Foil Text').'</td>']; |
|
my $table = '<table border="1" >'."\n"; |
my $table = '<table border="1" >'."\n"; |
|
$table .= '<tr><th>'.&mt('Foil Number').'</th>'. |
|
'<th>'.&mt('Foil Text')."</th></tr>\n"; |
my $index = 1; |
my $index = 1; |
foreach my $foilid (@Foils) { |
foreach my $foilid (@Foils) { |
$table .= '<tr><td>'.$index.'</td>'. |
$table .= '<tr><td>'.$index.'</td>'. |