BEGIN { Seed=1;
		Train="train"
		Test="test"
		Bins=10
	  }
/#/   { srand(Seed ? Seed : 1) 
		print $0 "">Train
		print $0 ""> Test
	    next
	   }	
      { N++; Lines[rand()]=$0 }
      END {for(Line in Lines) {
					N--;
					What= N % Bins ? Train : Test
					print Lines[Line]>>What
		}}