#include <bits/stdc++.h>
#define fi first
#define se second
#define rep(i,s,n) for (int i = (s); i < (n); ++i)
#define rrep(i,g,n) for (int i = (n)-1; i >= (g); --i)
#define all(a) a.begin(),a.end()
#define rall(a) a.rbegin(),a.rend()
#define len(x) (int)(x).size()
#define dup(x,y) (((x)+(y)-1)/(y))
#define pb push_back
#define eb emplace_back
#define Field(T) vector<vector<T>>
using namespace std;
using ll = long long;
using ull = unsigned long long;
template<typename T> using pq = priority_queue<T,vector<T>,greater<T>>;
using P = pair<int,int>;
template<class T>bool chmax(T&a,T b){if(a<b){a=b;return 1;}return 0;}
template<class T>bool chmin(T&a,T b){if(b<a){a=b;return 1;}return 0;}

static constexpr ll inf = 10000000000000000;

int main() {
  int n, m;
  cin >> n >> m;
  assert(4 <= n && n <= 50);
  assert(1 <= m && m <= 300000);
  vector<vector<ll>> G(n, vector<ll>(n, inf));
  rep(i,0,n) G[i][i] = 0;
  set<P> e_set;
  rep(i,0,m) {
    int u, v, c;
    cin >> u >> v >> c;
    assert(1 <= u && u <= n && 1 <= v && v <= n);
    assert(u != v);
    assert(1 <= c && c <= 1000000000);
    e_set.emplace(u, v);
    --u, --v;
    G[u][v] = c;
  }
  assert(len(e_set) == m);
  string s;
  cin >> s;
  assert(len(s) == n);
  rep(i,0,n) assert('A' <= s[i] && s[i] <= 'Z');
  rep(k,0,n) rep(i,0,n) rep(j,0,n) {
    G[i][j] = min(G[i][j], G[i][k]+G[k][j]);
  }
  ll ans = inf;
  rep(i,0,n) rep(j,0,n) rep(k,0,n) rep(l,0,n) {
    if (s[i] == 'K' && s[j] == 'C' && s[k] == 'P' && s[l] == 'C' && j != l) {
      ans = min(ans, G[0][i]+G[i][j]+G[j][k]+G[k][l]);
    }
  }
  // rep(i,0,n) {
  //   rep(j,0,n) {
  //     cout << G[i][j] << " ";
  //   }
  //   cout << endl;
  // }
  if (ans == inf) ans = -1;
  cout << ans << endl;
  return 0;
}