Select Code to Download

<td scope="row">A. millefolium 'Summer Wine'<input type="hidden" name=
+"I1" value="A. millefolium 'Summer Wine'"></td>
<td><label for="Q1"><input type="text" id="Q1" name="Q1" size="3" onch
+ange="calc_item(order,6);"></label></td>
<td><label for="P1">1 gal <input type="text" id="P1" name="P1" value="
+3.95" onfocus="this.blur();" size="4"></label></td>
<td><label for="IT1"><input type="text" id="IT1" name="IT1" value="0" 
+size="6" onfocus="this.blur();"></label></td>

%form = (
          'IT3' => '6.99',
          'I0' => '0',
...
          'Q10' => '10'
            <... snip>
        );

foreach(sort keys %form) {
   print "$_ $form{$_} \n";
   }

I0 0
I10 10
I3 3
...
IT3 6.99
P0 3.95
P10 3.65 ...

\t "I[" . 0 . "]" .... "I[" . 570 ."]"

%form = (
          'I0' => '0',
          'Q0' => '40',
...
            ...
          'IT647' => 741.34
        );