The Perl and Raku Conference 2025: Greenville, South Carolina - June 27-29 Learn more

[-
$sourceOption[0] = 'Make Selection';
$sourceOption[1] = 'Acme Vending';
$sourceOption[2] = 'ABC Rental';
@table = ([1, 2], [11,22]) ;
-]
<table class=1>
<tr>
<td>
[- $file = $table[$row][$col] -]
<table width="100%" border="0" cellspacing="2" cellpadding="0" name="filesourcetable">
<tr width=1>
<td class="thdPage2ndLevel">Upload File [+ $file +]</td>
</tr>
<tr width=2>
<td width="42%" class="text">
<select name="source1" class="text">
<option>Make Selection</option>
</select>
<select name="source2" class="text">
<option>[+ $sourceOption[$row] +]</option>
</select>
</td>
</tr>
</table>
</td>
</tr>
</table>