if (my $inp= ReadLine (-1)) {
	  if($inp =~ m/DISPLAYON/i){
	   if(($logging)&&($debug)){printf("DEBUG: User has request screen logging to be turned off : $inp\n");}
	   $logging = 1;
	   #next WILMER;
	  }elsif($inp =~ m/DISPLAYOFF/i){
	   if(($logging)&&($debug)){printf("DEBUG: User has request screen logging to be turned off : $inp\n");}
	   $logging = 0;
	  }
	 }
      }