Re^6: How can I read DATA in parent and child?

I've run it 20 times, it returned 15 lines 18 times, but only 10 lines 2 times.

#!/bin/bash
i=1
while : ; do
    n=$( 1230099.pl | wc -l )
    (( n == 15 )) || break
    printf '%d\r' $((i++))
done
echo "$i:$n"
[download]

It stopped after four another iterations with only 10 lines of output.

map{substr$_->[0],$_->[1]||0,1}[\*||{},3],[[]],[ref qr-1,-,-1],[{}],[sub{}^*ARGV,3]