Re^2: Why doesn't this print when i omit the newline?

..."Then you should see something interesting"

Here we go:

0
1       use strict;
2       use warnings;
3       use IO::All;
4
5       # v5.18.2
6       # Windows
7
8       my $io = io $0;
9        $| = 1;
10      while ( my ( $index, $value ) = each @$io ) {
11          print qq($index\t$value);
12          sleep 5;
13          print qq($index\t$value\n);
14
15      }
16      __END__
17
18
19
[download]

Thanks and best regards, Karl

ŤThe Crux of the Biscuit is the Apostropheť

Comment on Re^2: Why doesn't this print when i omit the newline? Download Code

Replies are listed 'Best First'.
Re^3: Why doesn't this print when i omit the newline? by davido (Cardinal) on Dec 16, 2014 at 15:45 UTC
Please don't manually add line numbers to your code. Then if I want to paste it, I have to remove them again. PerlMonks has an option in your user settings to enable line numbers so that you see them next to any code segment. You didn't mention what output you are getting here, but on my system I immediately get the first line printed, and then five seconds later I get the first line plus a newline. Then immediately the second line, and five seconds later the second line plus a newline, and so on. Ubuntu Linux 14.04 with Perl 5.20.1. Ah, I get it... windows, and ikegami nabbed it below. :) Dave	[reply]
Re^4: Why doesn't this print when i omit the newline? by ww (Archbishop) on Dec 16, 2014 at 19:36 UTC
The line numbers in Re^2: Why doesn't this print when i omit the newline? are introduced by IO::All; NOT by karlgoethebier. Spirit of the Monastery	[reply] [d/l]