Please read How do I post a question effectively?. In particular, the code you've posted does not compile; if the compilation is your error, please make sure to include the error message in your post. The compilation error is related to a number of omitted curly brackets.

If I make assumptions about where to stick the curly brackets based upon your indentation, you have made an odd choice for reading your lines: you will actually scan lines multiple times. If you want to take in all the data at the start (wholly unnecessary here), it could be done much more cleanly as: 

my @lines = <FH>;

[download]

Second, your choice to name your variable containing your current line $file is odd at best, and conflicts with the file name variable, which could easily lead to confusion.

Lastly, your use of regular expressions is quite unnecessarily computationally intensive, and doesn't actually require vowels be adjacent. A read through of perlretut would likely be enlightening. You probably mean something closer to 

if ($file =~ /[aeiou]{2}/i) {
    print $file;
}

[download]
Of course, this doesn't handle the conditional nature of y as a vowel. I assume you have plans to write a machine learning script to train against a dictionary so it can develop heuristics for resolving the ambiguity. Vowel should provide a sufficiently thorough background.

#11929 First ask yourself `How would I do this without a computer?' Then have the computer do it the same way.

In reply to Re: Vowel search by kennethk
in thread Vowel search by Noob@Perl

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.