#include <cstdio>
#include <cstring>

using namespace std;

#define FIN "pscpld.in"
#define FOUT "pscpld.out"
#define MAX_N 10005

char A[MAX_N];
int N;
long long BEST;

    int palind (int a, int b)
    {
        int ok = 1;
        while (a <= b)
        {
              if (A[a] != A[b]) ok = 0;
              ++a, --b;
        }
        return ok;
    } 

    int main ()
    {
        freopen (FIN, "r", stdin);
        freopen (FOUT, "w", stdout);
        
        gets (A);
        N = strlen (A) - 1;
        
        int i, j;
        for (i = 0; i <= N; ++i)
            for (j = i; j <= N; ++j)
                if (palind (i, j)) ++BEST;
        printf ("%lld\n", BEST);
        
        return 0;
    }