Do you always know the length of the file, and know which line you want to put it in? If so:

#!/usr/bin/perl -wT use strict; #get inserted text my @inserted_text = ('Blah','Blah Blah'); # read in the file open (FILE,"filename") or die "Can't open file"; my @file = <FILE> close(FILE) open (OUTFILE,">filename") or die "Can't open file"; my $line = 0; foreach(@file) { if ($line = 569) { foreach(@inserted_text){print OUTFILE;} } $line++; } close(OUTFILE);
Otherwise, you could find out the length of the file, and then subtract 30 from the end of the length, and insert it there.

This is untested code and, I'd bet 70 monks here could give you much, much better answers. I look forward to seeing them.


In reply to Re: How do I add a few stings of text, 30 lines before the EOF? by michellem
in thread How do I add a few stings of text, 30 lines before the EOF? by lucasdmc

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.