title: Faster way to read a file line by line in perl
body: <p>I have to read a big unix file line by line using perl. the script is taking more than 2 mins to run in case of big file but takes lesser time for small file.</p>
  
  <p>I am using following code:</p>
  
  <pre><code>open(FILE , "filename");
  
  while ( &lt; FILE &gt; ){ 
  
  }
  </code></pre>
  
  <p>Please let me know a way to parse file faster</p>