title: Perl lookup data in hashs table faster
body: <p>I use code like this to find data values for my calculations:</p>
  
  <pre><code> sub get_data {
   $x =0 if($_[1] eq "A"); #get column number by name
   $data{'A'}= [2.00000, 0.15000, -0.00143, 33.51030, 0.77, 1, 0, 12];
   return $data{$_[0]}[$x];
   }
  </code></pre>
  
  <p>Data is stored like this in Perl file. I plan no more than 100 columns. Then to get value I call:</p>
  
  <pre><code>    get_data(column, row);
  </code></pre>
  
  <p>Now I realized that that is terribly slow way to look up data in table. How can I do it faster? SQL?</p>