#include <iostream>
#include <fstream>
#include <algorithm>

using namespace std;

string name = "trie";
ifstream fin(name + ".in");
ofstream fout(name + ".out");

const int SIGMA = 26;

struct TrieNode {
    TrieNode* fii[SIGMA] = {};
    int nrFii;
    int nrCuvinte;
};

TrieNode *root;

void adaugaCuvant(TrieNode *node, string cuvant) {
    if (cuvant.size() == 0) {
        /// nod terminal - daca ramanem fara litere
        /// inseamna ca nodul actual simbolizeaza sfarsitul cuvantului
        ++node->nrCuvinte;
        return;
    }

    int pos = cuvant[0] - 'a';
    if (node->fii[pos] == nullptr) {
        node->fii[pos] = new TrieNode;
        ++node->nrFii;
    }
    /// mergem in nodul corespondent primei litere din cuvant
    /// cu cuvantul fara prima litera
    adaugaCuvant(node->fii[pos], cuvant.substr(1));
}

int nrAparitiiCuvant(TrieNode* node, string cuvant) {
    if (cuvant.size() == 0) {
        return node->nrCuvinte;
    }
    if (node == nullptr) {
        return 0;
    }
    int pos = cuvant[0] - 'a';
    return nrAparitiiCuvant(node->fii[pos], cuvant.substr(1));
}

int lungimePrefix(TrieNode* node, string cuvant) {
    if (cuvant.size() == 0) {
        /// intreg cuvantul e prefix
        return -1;
    }
    if (node == nullptr) {
        return -1;
    }
    int pos = cuvant[0] - 'a';
    return 1 + lungimePrefix(node->fii[pos], cuvant.substr(1));
}

bool stergeCuvant(TrieNode* node, string cuvant) {
    if (cuvant.size() == 0) {
        --node->nrCuvinte;
        if (node->nrFii == 0) {
            delete node;
            return true;
        }
        else {
            return false;
        }
    }

    int pos = cuvant[0] - 'a';
    bool amStersNod = stergeCuvant(node->fii[pos], cuvant.substr(1));
    if (amStersNod) {
        --node->nrFii;
        node->fii[pos] = nullptr;
        if (node->nrFii == 0) {
            delete node;
            return true;
        }
    }
    return false;
}

void dezalocaTrie(TrieNode* node) {
    if (node == nullptr) {
        return;
    }
    for (int i = 0; i < SIGMA; ++i) {
        dezalocaTrie(node->fii[i]);
    }
    delete node;
}

int main()
{
    int op;
    string s;

    root = new TrieNode;
    while (fin >> op >> s) {
        switch (op) {
            case 0: adaugaCuvant(root, s); break;
            case 1: stergeCuvant(root, s); break;
            case 2: fout << nrAparitiiCuvant(root, s) << '\n'; break;
            case 3: fout << lungimePrefix(root, s) << '\n'; break;
        }
    }
    dezalocaTrie(root);
    return 0;
}