#include <bits/stdc++.h>
using namespace std;
map<long long, int> m[26];
map<long long, int>::iterator it;
string s;
long long x[26], sum[100010];
void scan() {
  for (int i = 0; i < 26; i++) scanf("%lld", &x[i]);
  cin >> s;
}
void out() {
  long long ans = 0;
  sum[0] = x[s[0] - 'a'];
  m[s[0] - 'a'][sum[0]] = 1;
  for (int i = 1; i < s.size(); i++) {
    sum[i] = x[s[i] - 'a'] + sum[i - 1];
    ans += m[s[i] - 'a'][sum[i - 1]];
    ++m[s[i] - 'a'][sum[i]];
  }
  cout << ans << '\n';
}
int main() {
  scan();
  out();
  return 0;
}
