#include<bits/stdc++.h>
using namespace std;
#define ll long long
#define N 200005
int n,m,c[N];
char s[N],t[N];

int num;
int vis[200];
pair<int,int> x[60];char a[60];
int v[60][26],b[60][26];

ll f[N][60],cnt[60];
vector<int> G;
int main(){
    srand(time(0));
    scanf("%s%s",s+1,t+1);n=strlen(s+1),m=strlen(t+1);
    for(int i=1;i<=n;i++)scanf("%d",&c[i]);

    memset(vis,0,sizeof(vis));
    for(int i=1;i<=m;i++)if(!vis[t[i]])vis[t[i]]=1,x[++num]={i,t[i]};
    memset(vis,0,sizeof(vis));
    for(int i=m;i;i--)if(!vis[t[i]])vis[t[i]]=1,x[++num]={i,t[i]};
    sort(x+1,x+1+num);num=unique(x+1,x+1+num)-x-1;

    x[num+1].first=m+1;
    for(int i=1;i<=num;i++){
        a[i]=x[i].second;
        for(int j=x[i].first+1;j<x[i+1].first;j++)
            ++v[i][t[j]-'a'];
        for(int j=0;j<26;j++){
            bool f=false,g=false;
            for(int k=1;k<=i;k++)f|=x[k].second==j+'a';
            for(int k=i+1;k<=num;k++)g|=x[k].second==j+'a';
            if(!f||!g)v[i][j]=n+1;
        }
    }
    memset(f,-0x3f,sizeof(f));
    for(int i=0;i<=n;i++)f[i][0]=0;
    for(int j=1;j<=num;j++){//转移第 j 段
        memset(cnt,0,sizeof(cnt));int gd=0,all=0;ll w=0;
        for(int i=0;i<26;i++)gd+=v[j][i]==0,all+=v[j][i]!=n+1;
        for(int i=0,r=0;i<n;i++){//printf("Case %d \n",i);
            gd-=v[j][s[i+1]-'a']!=n+1&&cnt[s[i+1]-'a']==v[j][s[i+1]-'a'];
            --cnt[s[i+1]-'a'];
            w-=(v[j][s[i+1]-'a']!=n+1)*c[i+1];
            //printf("del %d %c | ",i+1,s[i+1]);
            //puts("");
            while(r<n&&(gd!=all&&cnt[s[r+1]-'a']+1<=v[j][s[r+1]-'a']||r<i+1)){
                ++r;
                ++cnt[s[r]-'a'];
                //printf("add %d %c | ",r,s[r]);
                w+=(v[j][s[r]-'a']!=n+1)*c[r];
                gd+=v[j][s[r]-'a']!=n+1&&cnt[s[r]-'a']==v[j][s[r]-'a'];
            }//puts("");
            //printf("%d %d %d\n",gd,all,r);
            //for(int i=0;i<26;i++)cout<<cnt[i]<<" ";puts("");
            if(s[i+1]==a[j]&&gd==all)f[r][j]=f[i][j-1]+w+c[i+1];//printf("%d %d %lld\n",i,r,c[i+1]);
        }
        for(int i=1;i<=n;i++)if(v[j][s[i]-'a']==n+1)f[i][j]=max(f[i][j],f[i-1][j]);//printf("%d %d\n",i-1,i);
        //puts("-=-=-=-=-=-=-=-=-=");
    }
    if(f[n][num]<0)return puts("You better start from scratch man..."),0;
    f[n][num]=-f[n][num];
    for(int i=1;i<=n;i++)f[n][num]+=c[i];
    printf("%lld\n",f[n][num]);
}