hi

This program will be keep running in background like tail -f .

that moment y find error it will capture and last 10 lines and next 10 lines and 
prints into the chat board. so while printing I want it as single variable. so, it 
will fast(one connection)

regards
Sreedhar

-----Original Message-----
From: Bee [mailto:[EMAIL PROTECTED]
Sent: 23 October 2004 13:44
To: Kalkunte-Venkatachala, Sreedhar; [EMAIL PROTECTED]
Subject: Re: How to store the out put in StringBuffer



Simplified your code, that is :

print foreach @buffer;

my $i;

while(<LOGFILE>)
 { $i++;  last if ($i > 10);
   print;
 }

I can't see anything make sense to make the thing
@buffer be in pair with <LOGFILE>. The first loop and
the second don't related to each other at all...

What do you expect ? Could you show some data you
are dealing with ?

Regards,
Bee





----- Original Message ----- 
From: <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Saturday, October 23, 2004 7:06 PM
Subject: How to store the out put in StringBuffer



Hi

Say I have program like this
If I Say print It prints each line. How to store the both output in one
string buffer ($previousLine and $var)

For example I have written this program
========================================
 foreach $previousLine (@buffer)
                        {
                        $j++;
                        print "$previousLine";
                        }
                        $i = 0;
                        $pos = tell LOGFILE;
                        while(<LOGFILE>)
                                {
                                $i++;
                                if ($i > 10)
                                        {
                                        last;
                                        }
                                $var = $_;
                                print $var;
                                }
========================================

Regards
Sreedhar

Visit our website at http://www.ubs.com

This message contains confidential information and is intended only
for the individual named.  If you are not the named addressee you
should not disseminate, distribute or copy this e-mail.  Please
notify the sender immediately by e-mail if you have received this
e-mail by mistake and delete this e-mail from your system.

E-mail transmission cannot be guaranteed to be secure or error-free
as information could be intercepted, corrupted, lost, destroyed,
arrive late or incomplete, or contain viruses.  The sender therefore
does not accept liability for any errors or omissions in the contents
of this message which arise as a result of e-mail transmission.  If
verification is required please request a hard-copy version.  This
message is provided for informational purposes and should not be
construed as a solicitation or offer to buy or sell any securities or
related financial instruments.


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>





-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>



Visit our website at http://www.ubs.com

This message contains confidential information and is intended only
for the individual named.  If you are not the named addressee you
should not disseminate, distribute or copy this e-mail.  Please
notify the sender immediately by e-mail if you have received this
e-mail by mistake and delete this e-mail from your system.

E-mail transmission cannot be guaranteed to be secure or error-free
as information could be intercepted, corrupted, lost, destroyed,
arrive late or incomplete, or contain viruses.  The sender therefore
does not accept liability for any errors or omissions in the contents
of this message which arise as a result of e-mail transmission.  If
verification is required please request a hard-copy version.  This
message is provided for informational purposes and should not be
construed as a solicitation or offer to buy or sell any securities or
related financial instruments.


--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>


Reply via email to