#include<bits/stdc++.h>
#define ll long long
#define pii make_pair
#define rep(i,a,b) for(int i=a;i<=b;++i)
#define per(i,a,b) for(int i=b;i>=a;--i)
const ll inf = 1145141919810;
using namespace std;
inline ll read(){
    ll x=0,f=1;
    char c=getchar();
    while (c<'0' || c>'9'){
        if (c=='-')  f=-1;
        c=getchar();
    }
    while (c>='0' && c<='9'){
        x=x*10+c-'0';
         c=getchar();
    }
    return x*f;
}
inline void print(ll x){
	if(x < 0) putchar('-'), x = -x;
	if(x > 9) print(x / 10);
	putchar(x % 10 + '0');
	return ;
}
const int mod = 998244353;
inline void pprint(ll x){print(x); puts("");}
const int N = 1e6 + 200;
struct SA {
	int rk[N << 1], sa[N << 1], n, lstrk[N << 1], lstsa[N << 1], w, m = 127, cnt[N << 1], h[N << 1], f[N << 1][30];
#define siz n * sizeof(int)
	char t[N << 1];
	void init(char *s) {
		n = strlen(s + 1);
		strcpy(t + 1, s + 1);
		m = 127;
		memset(cnt, 0, sizeof cnt);
		memset(sa, 0, sizeof sa);
		memset(rk, 0, sizeof rk);
		memset(h, 0, sizeof h);
		for(int i = 1; i <= n; ++i) ++cnt[rk[i] = s[i]];
		for(int i = 1; i <= m; ++i) cnt[i] += cnt[i - 1];
		for(int i = n; i >= 1; --i) sa[cnt[rk[i]]--] = i;
		memcpy(lstrk + 1, rk + 1, siz);
		for(int p = 0, i = 1; i <= n; ++i)
			if(lstrk[sa[i]] == lstrk[sa[i - 1]])
				rk[sa[i]] = p;
			else
				rk[sa[i]] = ++p;
		for(w = 1; w < n; w <<= 1, m = n) {
			for(int p = 0, i = n; i >= n - w + 1; --i) lstsa[++p] = i;
			for(int p = w, i = 1; i <= n; ++i)
				if(sa[i] > w)  lstsa[++p] = sa[i] - w;
			memset(cnt, 0, sizeof cnt);
			for(int i = 1; i <= n; ++i) ++cnt[rk[lstsa[i]]];
			for(int i = 1; i <= m; ++i) cnt[i] += cnt[i - 1];
			for(int i = n; i >= 1; --i) sa[cnt[rk[lstsa[i]]]--] = lstsa[i];
			memcpy(lstrk + 1, rk + 1, siz);
			for(int p = 0, i = 1; i <= n; ++i)
				if(lstrk[sa[i]] == lstrk[sa[i - 1]] && lstrk[sa[i] + w] == lstrk[sa[i - 1] + w])
					rk[sa[i]] = p;
				else
					rk[sa[i]] = ++p;
		}
		for(int i = 1, k = 0; i <= n; ++i) {
			if(rk[i] == 0) continue;
			if(k) --k;
			while(s[i + k] == s[sa[rk[i] - 1] + k]) ++k;
			h[rk[i]] = k;
		}
		memset(f, 0x3f, sizeof f);
		for(int i = 1; i <= n; ++i) f[i][0] = h[i];
		for(int j = 1; (1 << j) <= n; ++j)
			for(int i = 1; i <= n - (1 << j) + 1; ++i)
				f[i][j] = min(f[i][j - 1], f[i + (1 << (j - 1))][j - 1]);
	}
	void debug(){
		puts("------debug_SA--------");
		cout << "len = " << n << endl;
		for(int i = 1; i <= n; ++i)
			cout << sa[i] << " "; puts("");
		for(int i = 1; i <= n; ++i)
			cout << rk[i] << " "; puts("");
		for(int i = 1; i <= n; ++i){
			printf("%2d: ", i);
			for(int j = sa[i]; j <= n; ++j)
				putchar(t[j]); puts("");
		}
		puts("------End_Debug------");
	}
	int lcp(int x, int y) {
		if(x == y)
			return n - y + 1;
		x = rk[x], y = rk[y];
		if(x >= y) swap(x, y);
		int k = log2(y - (x + 1) + 1);
		return min(f[x + 1][k], f[y - (1 << k) + 1][k]);
	}
}sa;
ll n, m;
ll f[N];//从i开始往后几个
char p[N << 1];
ll dp[3];
ll cf[N][3];
ll sum[3];
signed main(){
	scanf("%s", p + 1);
	n = strlen(p + 1);
	p[n + 1] = '#';
	scanf("%s", p + n + 2);
	m = strlen(p + 1) - n - 1;
	sa.init(p);
	for(int i = 1; i <= n; ++i){
  		ll lcp1 = min(sa.lcp(n + 2, i) + 1ll, min(n - i + 1, m) );
		ll st = i + lcp1;
		ll lcp2 = 0;
		if(st <= n) lcp2 = sa.lcp(n + 2 + lcp1, st);
		f[i] = min(min(n - i + 1, m), lcp1 + lcp2);
		f[i] %= mod;
	}
	dp[0] = 1;
	dp[1] = 0;
	dp[2] = 0;
	for(int i = 1; i <= n; ++i){
		int ed = min(n, i + f[i] - 1);
		cf[i][2] += ((dp[2] + 2 * dp[1] % mod) % mod + dp[0]) % mod;
		cf[ed + 1][2] -= ((dp[2] + 2 * dp[1] % mod) % mod + dp[0]) % mod;
		cf[i][1] += (dp[1] + dp[0]) % mod;
		cf[ed + 1][1] -= (dp[1] + dp[0]) % mod;
		cf[i][0] += dp[0];
		cf[ed + 1][0] -= dp[0];
		for(int j = 0; j <= 2; ++j)
			cf[i][j] %= mod, cf[ed + 1][j] %= mod;
		for(int j = 0; j <= 2; ++j)
			dp[j] = sum[j] = (sum[j] + cf[i][j] + mod) % mod;
 	}
	pprint(dp[2] % mod);
	return 0;
}