$string = "@current_sentence";
	if( $string =~ /.*\bso\b.*/ ) {
	    print $string;
	}

#input:  <s> so we can do it again yeah yeah </s>
#output: <s> so