title: Warning - "Odd number of elements in hash assignment" in perl
body: <p>I am getting the warning with use of following syntax -</p>
  
  <pre><code>my %data_variables = ("Sno." =&gt; (5,0),
                  "ID" =&gt; (20,1), 
                  "DBA" =&gt; (50,2), 
                  "Address" =&gt; (80,3), 
                  "Certificate" =&gt; (170,4),
              );
  </code></pre>
  
  <p>But I dont get a similar warning at use of similar syntax.</p>
  
  <pre><code>my %patterns = ("ID" =&gt; ("(A[0-9]{6}?)"),
                  "Address" =&gt; ("&gt;([^&lt;]*&lt;br[^&gt;]+&gt;[^&lt;]*)&lt;br[^&gt;]+&gt;Phone"),
                  "Phone" =&gt; ("Phone: ([^&lt;]*)&lt;"),
                  "Certificate" =&gt; ("(Certificate [^\r\n]*)"),
                  "DBA" =&gt; ("&lt;br[^&gt;]+&gt;DBA: ([^&lt;]*)&lt;br[^&gt;]+&gt;"),
              );  
  </code></pre>