#include<bits/stdc++.h>
#define ll long long
using namespace std;
const int MAXN=1e6+5,MOD=998244353,P1=1e9+7,P2=1e9+9,B1=12367,B2=92385;
int n,m,ed[MAXN];
ll dp[MAXN][3],sum[MAXN][3];
char s[MAXN],t[MAXN];
ll pw[MAXN][2],vs[MAXN][2],vt[MAXN][2];
inline array<ll,2> S(int l,int r) {
	return {(vs[r][0]+P1-vs[l-1][0]*pw[r-l+1][0]%P1)%P1,(vs[r][1]+P2-vs[l-1][1]*pw[r-l+1][1]%P2)%P2};
}
inline array<ll,2> T(int l,int r) {
	return {(vt[r][0]+P1-vt[l-1][0]*pw[r-l+1][0]%P1)%P1,(vt[r][1]+P2-vt[l-1][1]*pw[r-l+1][1]%P2)%P2};
}
inline int lcp(int x,int y) {
	int l=0,r=min(n-x+1,m-y+1),res=0;
	while(l<=r) {
		int mid=(l+r)>>1;
		if(S(x,x+mid-1)==T(y,y+mid-1)) res=mid,l=mid+1;
		else r=mid-1;
	}
	return res;
} 
signed main() {
	scanf("%s%s",s+1,t+1);
	n=strlen(s+1),m=strlen(t+1);
	pw[0][0]=pw[0][1]=1;
	for(int i=1;i<=max(n,m);++i) pw[i][0]=pw[i-1][0]*B1%P1,pw[i][1]=pw[i-1][1]*B2%P2;
	for(int i=1;i<=n;++i) vs[i][0]=(vs[i-1][0]*B1+s[i]-'a')%P1,vs[i][1]=(vs[i-1][1]*B2+s[i]-'a')%P2;
	for(int i=1;i<=n;++i) vt[i][0]=(vt[i-1][0]*B1+t[i]-'a')%P1,vt[i][1]=(vt[i-1][1]*B2+t[i]-'a')%P2;
	for(int i=1;i<=n;++i) {
		int k=lcp(i,1);
		if(k==m||i+k-1==n) ed[i]=i+k-1;
		else ed[i]=i+k+lcp(i+k+1,k+2);
	}
	dp[n+1][0]=sum[n+1][0]=1;
	for(int i=n;i>=1;--i) {
		dp[i][0]=(sum[i+1][0]+MOD-sum[ed[i]+2][0])%MOD;
		dp[i][1]=(sum[i+1][1]+MOD-sum[ed[i]+2][1])%MOD;
		dp[i][2]=(sum[i+1][2]+MOD-sum[ed[i]+2][2])%MOD;
		dp[i][2]=(dp[i][2]+2*dp[i][1]+dp[i][0])%MOD;
		dp[i][1]=(dp[i][1]+dp[i][0])%MOD;
		sum[i][0]=(sum[i+1][0]+dp[i][0])%MOD;
		sum[i][1]=(sum[i+1][1]+dp[i][1])%MOD;
		sum[i][2]=(sum[i+1][2]+dp[i][2])%MOD;
	}
	printf("%lld\n",dp[1][2]);
	return 0;
}