if ( $x == 20 ) {
        my (undef , $data) = $this->read_processR ;
        last;
        $x = 0 ;