#include<queue>

 #include<cstdio>

 #include<cstring>

 #include<iostream>

 using namespace std;

 #define R register

 const int MAXL=1e6+;

 char s[MAXL];

 struct emm{

     int fail;

     int nxt[];

     int tag;

 }AC[MAXL];//Tree结构体

 queue<int>q;//get_fail的时候用的queue

 int main()

 {

     //freopen("a.in","r",stdin);

     ios::sync_with_stdio(false);

     cin.tie(false);cout.tie(false);

     int n;

     cin>>n;

     int tot=;

     //trie

     while(n--)

     {

         cin>>s;

         int len=strlen(s);

         int now=;//now表示当前的节点编号

         for(R int i=;i<len;++i)

         {

             if(!AC[now].nxt[s[i]-'a'])//如果当前节点没有这个儿子

               AC[now].nxt[s[i]-'a']=++tot;//就造个儿子

             now=AC[now].nxt[s[i]-'a'];//now跳到这个儿子上

         }

         AC[now].tag++;//now最后在的地方是这个模式串的结束点，标记一下

     }

     //get_fail

     {

         //首先把跟0号节点相连的点处理一下

         for(R int i=;i<;++i)

         {

             if(AC[].nxt[i])//如果这个儿子存在

             {

                 AC[AC[].nxt[i]].fail=;//把fail指向0号节点（其实默认就是0啊QAQ

                 q.push(AC[].nxt[i]);//把这个儿子push进去

             }

         }

         while(!q.empty())

         {

             int x=q.front();q.pop();//取点

             for(R int i=;i<;++i)

             {

                 if(AC[x].nxt[i])//如果这个儿子存在

                 {

                     AC[AC[x].nxt[i]].fail=AC[AC[x].fail].nxt[i];//敲重点！！！

                     //这个儿子的fail，等于这个节点fail的儿子   会手推就能懂叭QAQ

                     q.push(AC[x].nxt[i]);//push进去

                 }

                 else

                   AC[x].nxt[i]=AC[AC[x].fail].nxt[i];//这里直接把nxt指向了fail的对应儿子

             }

         }

     }

     //run

     cin>>s;

     long long ans=;

     int len=strlen(s);

     int now=;//now表示当前节点编号

     for(R int i=;i<len;++i)

     {

         now=AC[now].nxt[s[i]-'a'];//往下走一层（因为之前直接把空的nxt往fail指了，所以不需要通常的while跳fail

 //大概就是Trie图和Trie树的区别了叭

         for(R int t=now;t&&AC[t].tag!=-;t=AC[t].fail)//从这个点开始暴力跳fail，找匹配

         {

             ans+=AC[t].tag;

             AC[t].tag=-;//这是个剪枝

         }

     }

     cout<<ans;

     return ;//撒花

 }