#include <bits/stdc++.h>
#define rep(i, n) for (int i = 0; i < (int)(n); i++)
#define rrep(i, n) for (int i = (int)(n - 1); i >= 0; i--)
#define all(x) (x).begin(), (x).end()
#define sz(x) int(x.size())
using namespace std;
using ll = long long;
const int INF = 1e9;
const ll LINF = 1e18;
template <class T>
void get_unique(vector<T>& x) {
    x.erase(unique(x.begin(), x.end()), x.end());
}
template <class T>
bool chmax(T& a, const T& b) {
    if (a < b) {
        a = b;
        return 1;
    }
    return 0;
}
template <class T>
bool chmin(T& a, const T& b) {
    if (b < a) {
        a = b;
        return 1;
    }
    return 0;
}
template <class T>
vector<T> make_vec(size_t a) {
    return vector<T>(a);
}
template <class T, class... Ts>
auto make_vec(size_t a, Ts... ts) {
    return vector<decltype(make_vec<T>(ts...))>(a, make_vec<T>(ts...));
}
template <typename T>
istream& operator>>(istream& is, vector<T>& v) {
    for (int i = 0; i < int(v.size()); i++) {
        is >> v[i];
    }
    return is;
}
template <typename T>
ostream& operator<<(ostream& os, const vector<T>& v) {
    for (int i = 0; i < int(v.size()); i++) {
        os << v[i];
        if (i < sz(v) - 1) os << ' ';
    }
    return os;
}
int main() {
    string s;
    cin >> s;
    map<char, char> mp;
    rep(c, 26) mp[c + 'a'] = c + 'a';
    mp['l'] = '1';
    mp['o'] = '0';
    mp['a'] = '@';
    mp['s'] = '$';
    set<string> st;
    rep(bit, 1 << 8) {
        string t = s;
        rep(i, 8) if (bit >> i & 1) t[i] = mp[t[i]];
        int f = 0;
        rep(i, 8) {
            if (isdigit(t[i]))
                f |= 0b001;
            else if (islower(t[i]))
                f |= 0b010;
            else
                f |= 0b100;
        }
        if (f == 0b111) {
            st.insert(t);
        }
    }
    cout << sz(st) << '\n';
}