$i=0;
while (<STDIN>){
	chop();
	s/NEWLINE/ /g;
	s/SEMICOLON/\;/g;
	tr/[A-Z]/[a-z]/;
	while (/\s([^\s]*)\s+($ARGV[0])\s+([^\s]*)/g){
		print "$1 $2 $3\n";
	}
	$i++;
}