http://www.perlmonks.org?node_id=566170

perlNinny has asked for the wisdom of the Perl Monks concerning the following question:

I have a script which is to print 2400 lines but it seems to stop midway through line 2327. Am I printing too fast? How do I slow it down? Code:
my @keys_output = keys(%output); my $temp = @keys_output; print "$temp in output\n"; foreach my $data (@keys_output) {print $data.",".$output{$data}."\n";} #prints 2327 lines.

Considered by Albannach: perhaps a more meaningful title like 'print stops too soon'
Unconsidered by planetscape: keep votes trump edit votes ( keep:6 edit:37 reap:0 )