hi fellow monks, thanks for the prompt reply. Yes actually this is running on an UNIX env. And this script is actually being called on top of another script.
One funny thing i've noticed is that the script should be running prior to the copy to another directory and also before it's being printed out.
But what i'm seeing is that the softcopy doesn't have this information appended and the hardcopy does.
Is the problem really from my script or from the part that runs below it?
# Moved earlier to accomodate changes into the test summaries
#-------------------------------eMarginality Tool extract-------------
+------------------------
if ($RUNMODE eq "P" && $PRODUCT  =~ /7ALGMV|7KEDMV|7ALGRV|7KEDRV|7RAYT
+V/ ) {
    if(-e '/prod/datools/tools/MTP/emt_extract.pl'){
        system "perl /prod/datools/tools/MTP/emt_extract.pl &";
    }
}

unless(-e "$HOME/sbl/orig_sum_dir/$PRODUCT"){
       system "mkdir $HOME/sbl/orig_sum_dir/$PRODUCT";
       system "chmod 777  $HOME/sbl/orig_sum_dir/$PRODUCT";
}

system "cp /tmp/t4sum $HOME/sbl/orig_sum_dir/$PRODUCT/${LOTNO}_${LOC}_
+${TYPE_NUM}${TYPE_LETT}";

unless(-e "$HOME/sbl/printed_sum_dir/$PRODUCT"){
        system "mkdir $HOME/sbl/printed_sum_dir/$PRODUCT";
        system "chmod 777  $HOME/sbl/printed_sum_dir/$PRODUCT";
}

system "cp /tmp/foo $HOME/sbl/printed_sum_dir/$PRODUCT/foo${LOTNO}_${L
+OC}_${TYPE_NUM}${TYPE_LETT}";
system "chmod 777 $HOME/sbl/sbl_sum_dir/$PRODUCT/${LOTNO}_${LOC}_$day$
+month${year}_${ww}";

if ($PRODUCT!~/^(8ARD|7KEDR)/)   {
    system "lpr /tmp/foo &";
}
else {
    system "/data/sbl/cchecklot ${LOTNO}_${LOC} $PRODUCT > /tmp/check_
+print";
    system "sleep 4";

    ## Will check for file exist and PCS triggered before adding the p
+cs message
    if(-e '/tmp/check_print' && $PCS_T == 1 && $SBL_T == 1 && $NUTESTE
+D >= 500 && $PCS_FOUND==1 && $TYPE_NUM==1){
          &print_pcsmess;
    }
    system "lpr /tmp/check_print";
}

system "chmod 777 $HOME/sbl/tmp/${LOTNO}_${LOC}_tmp1";
system "chmod 777 /tmp/t4sum";
system "chmod 777 /tmp/foo";
system "chmod 777 /tmp/check_print";

[download]

In reply to Re^2: Append problem!!PLS HELP! by MelaOS
in thread Append problem!!PLS HELP! by MelaOS

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.