#include<fstream>
#include<algorithm>
#include<cstring>
#define MOD1 666013
#define MOD2 100021
using namespace std;
int l,lung,k,u,poz,sol,p3;
char s[10000001],sir[21];
struct code
{
	int h1,h2;
};
code h[50001],val;

ifstream fin("abc2.in");
ofstream fout("abc2.out");

int cmp(code a,code b)
{
	return a.h1<b.h1;
}

void genereazaHash(char s[],int l,code &h)
{
	for(int i=0;i<l;i++)
	{
		h.h1=(h.h1*3+s[i]-'a')%MOD1;
		h.h2=(h.h2*3+s[i]-'a')%MOD2;
	}
}

void prelucareDictionar()
{
	fin.getline(sir,21);
	lung=strlen(sir);
	do
	{
		genereazaHash(sir,lung,h[++k]);
	}while(fin.getline(sir,21));
	sort(h+1,h+k+1,cmp);
	u=1;;
	for(int i=2;i<=k;i++)
	{
		if(h[i].h1!=h[i-1].h1 || h[i].h2!=h[i-1].h2)
		{
			h[++u].h1=h[i].h1;
			h[u].h2=h[i].h2;

		}
	}
}

void putere3()
{
	p3=1;
	for(int i=1;i<lung;i++)
	{
		p3*=3;
	}
}

int cauta(code val)
{
	int st=1,dr=u,m;
	while(st<=dr)
	{
		m=(st+dr)/2;
		if(h[m].h1==val.h1)
		{
			if(h[m].h2==val.h2)
				return 1;
			return 0;
		}

		if(h[m].h1<val.h1)
		{
			st=m+1;
		}
		else
			dr=m-1;
	}
	return 0;
}

int main()
{
	fin.getline(s,10000001);
	l=strlen(s);
	prelucareDictionar();
	if(l<lung)
	{
		fout<<0;
		return 0;
	}
	putere3();
	genereazaHash(s,lung,val);
	sol+=cauta(val);
	for(int i=lung;i<l;i++)
	{
		val.h1-=((s[i-lung]-'a')*(p3%MOD1) )%MOD1;
		val.h1=(val.h1+MOD1)%MOD1;
		val.h1=(val.h1*3+s[i]-'a')%MOD1;
		val.h2-=((s[i-lung]-'a')*(p3%MOD2))%MOD2;
		val.h2=(val.h2+MOD2)%MOD2;
		val.h2=(val.h2*3+s[i]-'a')%MOD2;
		sol+=cauta(val);
	}
	fout<<sol;
	return 0;
}