Hi Omid,<div><br></div><div>Most probably you do not need to reinstall Perl :)</div><div><br></div><div>Just disable the buffering on the STDOUT handle:</div><div><br></div><div><div>use warnings;</div><div>use strict;</div>
<div><br></div><div>use FileHandle;</div><div><br></div><div>STDOUT->autoflush;</div><div><br></div><div>while (<DATA>) {</div><div> chomp $_;</div><div> print "$_";</div><div> sleep 1;</div>
<div><br></div><div>}</div><div><br></div><div>__END__</div><div>a</div><div>b</div><div>c</div><div>d</div><div>e</div><div>f</div><div>g</div><div>h</div><div><br></div><br><div class="gmail_quote">On Mon, Feb 7, 2011 at 9:21 AM, Omid Gulban <span dir="ltr"><<a href="mailto:omid.gulban@sickkids.ca">omid.gulban@sickkids.ca</a>></span> wrote:<br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex;">Hello All,<br>
<br>
I have used chomp a countless number of times before and had no problem. I am also well aware of the end of line characters on various platforms. What confuses me the most as well is<br>
when I included a "sleep 1; " in the code as listed below:<br>
<div class="im"><br>
use warnings;<br>
use strict;<br>
<br>
while (<DATA>) {<br>
chomp $_;<br>
print "$_";<br>
</div> sleep 1;<br>
<div class="im"><br>
}<br>
<br>
__END__<br>
a<br>
b<br>
c<br>
d<br>
e<br>
f<br>
g<br>
h<br>
<br>
<br>
</div>I expected a 1 second delay in between the print statements. BUT PERL waits 8 (1 second for a,b,c,d...h) seconds and prints everything together!<br>
maybe I should uninstall perl and reinstall it again!<br>
<br>
I have used chomp for about 8 years and never seen this.<br>
<br>
<br>
<br>
<br>
Thanks<br>
O<br>
________________________________________<br>
From: toronto-pm-bounces+gulban=<a href="http://sickkids.ca" target="_blank">sickkids.ca</a>@<a href="http://pm.org" target="_blank">pm.org</a> [toronto-pm-bounces+gulban=<a href="http://sickkids.ca" target="_blank">sickkids.ca</a>@<a href="http://pm.org" target="_blank">pm.org</a>] On Behalf Of Omid Gulban [<a href="mailto:omgulban@yahoo.ca">omgulban@yahoo.ca</a>]<br>
Sent: February 4, 2011 3:42 PM<br>
<div class="im">To: <a href="mailto:tpm@to.pm.org">tpm@to.pm.org</a><br>
Subject: [tpm] chomp problem<br>
<br>
</div><div><div></div><div class="h5">Hello All,<br>
<br>
I have a simple script shown below:<br>
on windows xp platform.<br>
<br>
<br>
<br>
use warnings;<br>
use strict;<br>
<br>
while (<DATA>) {<br>
chomp $_;<br>
print "$_";<br>
}<br>
<br>
__END__<br>
a<br>
b<br>
c<br>
d<br>
e<br>
f<br>
g<br>
h<br>
<br>
<br>
Why do I get an output that looks like this:<br>
a<br>
ab<br>
bc<br>
cd<br>
de<br>
ef<br>
fg<br>
ghh<br>
<br>
I expected to see:<br>
abcdefg<br>
<br>
<br>
Thanks<br>
O<br>
<br>
<br>
</div></div>This e-mail may contain confidential, personal and/or health information(information which may be subject to legal restrictions on use, retention and/or disclosure) for the sole use of the intended recipient. Any review or distribution by anyone other than the person for whom it was originally intended is strictly prohibited. If you have received this e-mail in error, please contact the sender and delete all copies.<br>
<div><div></div><div class="h5">_______________________________________________<br>
toronto-pm mailing list<br>
<a href="mailto:toronto-pm@pm.org">toronto-pm@pm.org</a><br>
<a href="http://mail.pm.org/mailman/listinfo/toronto-pm" target="_blank">http://mail.pm.org/mailman/listinfo/toronto-pm</a><br>
</div></div></blockquote></div><br><br clear="all"><br>-- <br>Emil Janev<br>
</div>