#include <bits/stdc++.h>
using namespace std;
char str[1010];
map<string, int> M;
int res = 0;
void doMagic() {
  char op;
  scanf("%c", &op);
  string s;
  while (op != '.') switch (op) {
      case (','):
        scanf("%[^.,:]s", str);
        if (M[str]) res += M[str];
        M[str]++;
        s = str;
        doMagic();
        M[s]--;
        scanf("%c", &op);
        break;
      case (':'):
        scanf("%[^.,:]s", str);
        if (M[str]) res += M[str];
        M[str]++;
        s = str;
        doMagic();
        M[s]--;
        scanf("%c", &op);
        break;
    }
ex:;
}
int main() {
  scanf("%[^.,:]s", str);
  M[str]++;
  doMagic();
  cout << res;
exit:
  return (0);
}
