#include<bits/stdc++.h>
using namespace std;
string S;
int sol,A[1000005],B[1000005],C[1000005];
long long dp[1000009];
long long MOD=998244353;
struct slog{
  int ID;
  int m,v,mid;
}SVE[1000009][3];
int GLOBcmp=0;
bool cmp(slog x, slog y){
  return x.v<y.v;
}
vector<slog>M[3][1000009];
vector<int>fM[3][1000009];
vector<int>ALLm[3];
map<int,int>imam[3];
int imampok[3];

void update_fenvicks(int ID){
  long long dodaj=dp[ID];
  for(int X=0; X<=2; X++){
    slog sl=SVE[ID][X];
    int m=sl.m;
    int mid=sl.mid;
    while(mid<fM[X][m].size()-2){
      fM[X][m][mid]+=dodaj;
      if(fM[X][m][mid]>=MOD)fM[X][m][mid]-=MOD;
      mid+=mid&(-mid);
    }
  }
}
void add_fenvicks_to_dp(int ID){
  for(int X=0; X<=2; X++){
    slog sl=SVE[ID][X];
    int m=sl.m;
    int mid=sl.mid-1;
    long long ukupno=0;
    while(mid>0){
      ukupno+=fM[X][m][mid];
      if(ukupno>=MOD)ukupno-=MOD;
      mid-=mid&(-mid);
    }
    dp[ID]+=ukupno;
    if(dp[ID]>=MOD)dp[ID]-=MOD;
  }
}
int main(){
  cin>>S;
  S=' '+S+' ';
  for(int i=1; i<S.size()-1; i++){
    A[i]=A[i-1]+(S[i]=='I');
    B[i]=B[i-1]+(S[i]=='P');
    C[i]=C[i-1]+(S[i]=='C');
  }
  for(int i=0; i<S.size()-1; i++){
    SVE[i][0].ID=i;
    SVE[i][1].ID=i;
    SVE[i][2].ID=i;
    SVE[i][0].m=A[i]-B[i];
    SVE[i][1].m=A[i]-C[i];
    SVE[i][2].m=B[i]-C[i];
    SVE[i][0].v=3*C[i]-i;
    SVE[i][1].v=3*B[i]-i;
    SVE[i][2].v=3*A[i]-i;
    if(imam[0][SVE[i][0].m]==0)imam[0][SVE[i][0].m]=++imampok[0];
    if(imam[1][SVE[i][1].m]==0)imam[1][SVE[i][1].m]=++imampok[1];
    if(imam[2][SVE[i][2].m]==0)imam[2][SVE[i][2].m]=++imampok[2];
    SVE[i][0].m=imam[0][SVE[i][0].m];
    SVE[i][1].m=imam[1][SVE[i][1].m];
    SVE[i][2].m=imam[2][SVE[i][2].m];
  }
  for(int i=0; i<S.size()-1; i++){
    for(int X=0; X<=2; X++){
      slog sl=SVE[i][X];
      M[X][sl.m].push_back(sl);
      if(M[X][sl.m].size()==1)ALLm[X].push_back(sl.m);
    }
  }
  for(int X=0; X<=2; X++){
    for(int i=0; i<ALLm[X].size(); i++){
      int m=ALLm[X][i];
      GLOBcmp=X;
      sort(M[X][m].begin(),M[X][m].end(),cmp);
      vector<slog>v=M[X][m];
      int mid=1;
      for(int j=0; j<v.size()-1; j++){
        SVE[v[j].ID][X].mid=mid;
        if(v[j].v<v[j+1].v)mid++;
      }
      SVE[v[v.size()-1].ID][X].mid=mid;
      for(int i=0; i<=mid+3; i++)fM[X][m].push_back(0);
    }
  }
  dp[0]=1;
  update_fenvicks(0);
  for(int i=1; i<S.size()-1; i++){
    add_fenvicks_to_dp(i);
    update_fenvicks(i);
  }
  cout<<dp[S.size()-2]<<"\n";
  return 0;
}