#include <bits/stdc++.h>
using namespace std;
const int N = (int)1e6 + 7;
const long long INF = (long long)1e9 + 7;
char st[N];
map<long long, long long> s[200];
long long c[N];
int main() {
  int n;
  long long t, ans = 0, x = 0;
  for (char i = 'a'; i <= 'z'; i++) cin >> c[i];
  gets(st);
  gets(st);
  n = strlen(st);
  for (int i = 0; i < n; i++) {
    x += c[st[i]];
    ans += s[st[i]][x - c[st[i]]];
    s[st[i]][x]++;
  }
  cout << ans;
  return 0;
}
