How do I write information to a file that is currently opened? Please see below for a clearer explanation on what I mean. I have this script below that basically write some information to a log file.
#!/usr/bin/perl use warnings; use strict; $|++; my $main_log = '/tmp/main_log.txt'; my $sub_log = '/tmp/sub_log.txt'; print "Start: Coming from the script.\n"; open( my $main_log_file, '>>', $main_log ) or die( "Error: Cannot open $main_log" ); print $main_log_file "Coming from re-opening " . "the opened log file.\n\n"; open( my $sub_log_file, '<', $sub_log ) or die( "Error: Cannot open $sub_log" ); print $main_log_file $_ while( <$sub_log_file> ); close( $sub_log_file ); close( $main_log_file ); <>; # This will just pause the script. print "End: Coming from the script.\n";
When I execute it like this (note that the name of the log file is the same as log file in the script),
#$ perl test.pl > /tmp/main_log.txt
Since I added the '<>;' statement, it will pause the script before it completely ends. Here the log file before the '<>;' statement. So, the additional information is being written to the log file.
Start: Coming from the script. Coming from re-opening the opened log file. Coming from sub-log file.
And here's the output after the '<>;' statement. The 'additional information' becomes
Start: Coming from the script. End: Coming from the script. ened log file. Coming from sub-log file.
So, the output that I want is something like this.
Start: Coming from the script. Coming from re-opening the opened log file. Coming from sub-log file. End: Coming from the script.
So, is there a workaround on what I am trying to do?

In reply to How to Write Information to an Opened File by bichonfrise74

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.