[tpm] Writing to STDOUT in batches

[Indy Singh]

Tell us the 'more complicated sed command'.  We might be able to come with a reg expression that would give you equivalent in pure perl.
Something like this:
$x = content();
$x =~ s/some_reg_ex/;
print $x;

Since some us are not sed experts just also explain in words (or pseudo-perl) what you want the command to do.


Indy Singh
IndigoSTAR Software -- www.indigostar.com

  ----- Original Message ----- 
  From: Antonio Sun 
  To: TPM Mongers 
  Sent: Monday, December 06, 2010 10:22 AM
  Subject: [tpm] Writing to STDOUT in batches


  Hi, 


  I have the following code in a loop:


      open(OUTFILE, "$cmd >> myfile"); # append write 
     print OUTFILE content();
     close(OUTFILE);


  The $cmd is a complicated sed command. For simplicity purpose, let's say it is 


    | sed -n '10,20p' 


  I.e., printing only lines 10~20 of the content of each loop. 


  My goal is to write to STDOUT instead of a fixed file. I tried to change the above open statement with


     open(OUTFILE, "$cmd >-");   # write to STDOUT


  or,


     open(OUTFILE, "$cmd >>-");   # write to STDOUT


  but didn't get any output. 


  Anyone can help me here? 


  BTW, in case you wonder why the open statement is in the loop -- if I don't do it this way and open outside the loop instead, I'll  get the first 10~20 lines only from the first loop.


  Thanks


  antonio






------------------------------------------------------------------------------


  _______________________________________________
  toronto-pm mailing list
  toronto-pm at pm.org
  http://mail.pm.org/mailman/listinfo/toronto-pm
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://mail.pm.org/pipermail/toronto-pm/attachments/20101206/1f162c3e/attachment-0001.html>