Select Code to Download

  <table class="gridtable" summary="RegTable">
<tr><th>Address</th><th>Register</th><th>7</th><th>6</th><th>5</th><th
+>4</th><th>3</th><th>2</th><th>1</th><th>0</th><th>Reset</th><th>Desc
+ription</th></tr>
...
<tr><th>Address</th><th>Register</th><th>15</th><th>14</th><th>13</th>
+<th>12</th><th>11</th><th>10</th><th>9</th><th>8</th><th>7</th><th>6<
+/th><th>5</th><th>4</th><th>3</th><th>2</th><th>1</th><th>0</th><th>R
+eset</th><th>Description</th></tr>
<tr><td>0x00000100</td><td><a href="#FuseMap:FUSE0">FUSE0</a></td><td 
+align=center colspan=8> F_1 </td><td align=center colspan=8> F_0 </td
+><td>'h0000</td><td>FUSE0.</td></tr>
</table>

use HTML::TableExtract;

...
 $te->parse_file($file);
  @tcount1 = $te->counts(0);
  print " tcount1 : @tcount1:\n";

 @headers = qw( Address Register 15 14 13 12 11 10 9 8 7 6);

 @headers = qw( Address Register 15 14 13 12 11 10 9 8 7 6 5);

 @headers = qw( Address Register 15 14 13 12 11 10 9 8 7 6 5 4 3 2 1 0
+);