my $file = "$this->{LOG_DIR}/input.$n.r" ;
    sleep(2);
    while( -e $file || -e "$file._" ) {

##</code><code>##

my ($x,$xx) ;
    sleep(2);
    while( (!$has_quit || $this->{STOPING} == 1) && -e $file && $this->is_started( !$this->{STOPING} ) ) {
    ++$x ;

##</code><code>##

my ($n) = ( $data =~ /(\d+)\s*$/gi );
    $n = 1 if $n eq '' ;
    sleep(1);
    return( $n , $data ) if wantarray ;