#include <bits/stdc++.h>
using namespace std;

string s;
int n;

// Phân loại ký tự: 0 = chữ hoa, 1 = chữ thường, 2 = chữ số
int typeOf(char c) {
    if (c >= 'A' && c <= 'Z') return 0;
    if (c >= 'a' && c <= 'z') return 1;
    return 2;
}

// Sub 1: vét cạn O(n^2). Với mỗi i, mở rộng j và ghi nhận đã gặp đủ ba loại chưa.
// Dùng khi n <= 2000.
void sub1() {
    long long cnt = 0;
    for (int i = 0; i < n; i++) {
        bool seen[3] = {false, false, false};
        int kinds = 0;
        for (int j = i; j < n; j++) {
            int t = typeOf(s[j]);
            if (!seen[t]) {
                seen[t] = true;
                kinds++;
            }
            int len = j - i + 1;
            if (len >= 6 && kinds == 3) cnt++;
        }
    }
    cout << cnt << "\n";
}

// Số đoạn con có độ dài >= 6 nằm trong một đoạn liên tiếp dài r: (r-5)(r-4)/2 (khi r >= 6)
long long countInRuns(int forbidMask) {
    long long res = 0;
    long long run = 0;
    for (int i = 0; i <= n; i++) {
        bool allowed = (i < n) && !((forbidMask >> typeOf(s[i])) & 1);
        if (allowed) {
            run++;
        } else {
            if (run >= 6) res += (run - 5) * (run - 4) / 2;
            run = 0;
        }
    }
    return res;
}

// Sub 2: nguyên lý bù trừ O(n). Đáp án = sum over F ⊆ {hoa, thường, số} (-1)^|F| * count(F),
// với count(F) là số đoạn con dài >= 6 không chứa loại ký tự nào trong F.
void sub2() {
    long long ans = 0;
    for (int F = 0; F < 8; F++) {
        int bits = __builtin_popcount(F);
        long long c = countInRuns(F);
        ans += (bits % 2 == 0 ? 1 : -1) * c;
    }
    cout << ans << "\n";
}

int main() {
    freopen("CAU5.INP", "r", stdin);
    freopen("CAU5.OUT", "w", stdout);
    ios::sync_with_stdio(false);
    cin.tie(nullptr);
    cin >> s;
    n = s.size();
    if (n <= 2000) sub1();
    else sub2();
    return 0;
}