title: How do I match words of a specific length with a regex in Perl?
body: <p>I want to find a word which is only three letter and starts with t and ends with e. Is there any other way, apart from what i have done:</p>
  
  <pre><code>open (FH, "alice.txt");
  @lines = &lt;FH&gt;;
  close(FH);
  
  foreach $words(@lines)
  {
     if($words =~ m/ t.e /g)
     {
       print $words," ";
     }
  }
  </code></pre>
  
  <p>Also I wanted to find words which are more than 3 letters long. How can I achieve that? a word can have anything, apart from whitespaces. Any word, need not start with t or end with e. Any word which is more that 3 letters.</p>