It's a little known fact that the Perl 5 parser will reject any input lines containing the string "Java". That's probably what's getting you.1

Seriously, there's nothing obviously wrong with your program. I would suggest first trying to pin down whether the problem is with reading the file or outputting results. For instance, right after you close the filehandle, add: print "I got ", scalar(@lines), " from the file\n"; If you get one line, the problem's with the input, and if you get seven lines, it's with the output. At least that will split the program in two, and you can concentrate on half as much code.

Is there anything screwy with the file delimiters? Did you by chance copy it from, say, Unix to Windows in binary mode? Also, if your output is to a shell, try saving it in a file and seeing if there's any funny characters in there.

HTH

1<voice type="cartoon" character="Foghorn Leghorn">That's a joke, son. Yuk it up.</voice>

In reply to Re: Strange File read problem by VSarkiss
in thread Strange File read problem by abhishes

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.