If you are only interested in a solution (and are on something unixoide) you could simply use "split", a command line utility

If you are interested in learning perl, I'll give you a few hints instead of the solution on a platter:

Your inner loop makes no sense. An inner loop is run completely for every invocation of the outer loop. So since your outer loop is going through the lines of your input file, you seem to open a new file for each line of your input file. Not good.

What you need is a counter (similar to $fileNR, but for input lines). This counter counts to 1000. If it reaches 1000 you open a new file and reset the counter to 0. That's it

Further optimization: If you want you can use $x as the counter. You just don't reset it and use modulo arithmetic instead, i.e. if $x modulo 1000 is 0, then open a new file. The modulo operator in perl is "%"


In reply to Re: Splitting a text file by jethro
in thread Splitting a text file by Dr Manhattan

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.