import java.io.*;
import java.util.*;
public class Sona1{
  //programm kysib failinime ja s6na ning va"ljastab
  //lause l6pus leiduvate vastavate so~nade arvu
  public static void main(String argumendid[]) throws IOException{
    String failinimi=Tekstiabi.kysiVastus("Sisesta failinimi:");
    String sona=Tekstiabi.kysiVastus("Sisesta s6na:");
    String lausemassiiv[]=Tekstiabi.lauseteks(Tekstiabi.loeFail(failinimi));
    String sona1=sona.concat(".");
    String sona2=sona.concat("!");
    String sona3=sona.concat("?");
    int arv=0;
    int arv1=0;
    int arv2=0;
    int arv3=0;
    for(int i=0; i<lausemassiiv.length; i++){
        arv1+=Tekstiabi.loenda(lausemassiiv[i], sona1);
    }
    for(int i=0; i<lausemassiiv.length; i++){
        arv2+=Tekstiabi.loenda(lausemassiiv[i], sona2);
    }
    for(int i=0; i<lausemassiiv.length; i++){
        arv3+=Tekstiabi.loenda(lausemassiiv[i], sona3);
    }
    arv=arv1+arv2+arv3;
    System.out.println("S6na "+sona+" asub lause l6pus "+arv+" korda.");
  }
}

class Tekstiabi{
  //loeb tekstifaili u"heks pikaks so~neks
  static String loeFail(String failinimi) throws IOException{
    StringBuffer sb=new StringBuffer();
    RandomAccessFile rf=new RandomAccessFile(failinimi, "r");
    String rida=rf.readLine();
    while(rida!=null){
      sb.append(rida+" ");
      rida=rf.readLine();
    }
    int pikkus=sb.length();
    sb.delete(pikkus-1, pikkus);
    return new String(sb);
  }

  //loendab, mitu sona on lauses
  static int loenda(String lause, String sona){
    int nr=0, algkoht=0;
    while(algkoht<lause.length()){
      int koht=lause.indexOf(sona, algkoht);
      if(koht>=0){
        nr++; algkoht=koht+sona.length();
      } else algkoht=lause.length();
    }
    return nr;
  }

  //ku"sib kasutajalt so~ne
  static String kysiVastus(String kysimus) throws IOException{
    System.out.println(kysimus);
    BufferedReader br=new BufferedReader(
      new InputStreamReader(System.in)
    );
    return br.readLine();
  }

  //jagab faili lauseteks
  static String[] lauseteks(String s){
    String lause="";
    Vector sahver=new Vector();
    StringTokenizer st=new StringTokenizer(s, ".?!", true);
    lause=st.nextToken();
    while(st.hasMoreTokens()){
      String uus=st.nextToken();
      char c=uus.trim().charAt(0);
      if(Character.isLowerCase(c)|uus.length()==1){
        lause+=uus;
      } else{
        sahver.addElement(lause);
        lause=uus;
      }
    }
    sahver.addElement(lause);
    String[] laused=new String[sahver.size()];
    for(int i=0; i<sahver.size(); i++){
      laused[i]=(String)sahver.elementAt(i);
    }
    return laused;
  }
}