#pragma GCC target("avx2")
#pragma GCC optimize("O3")
#pragma GCC optimize("unroll-loops")
#include<bits/stdc++.h>
#include <atcoder/all>
using ull = unsigned long long;
using namespace std;
using namespace atcoder;
using vst = vector<string>;
using ll = long long;
using ld = long double;
using P = pair<ll,ll>;
using vl = vector<ll>;
using vvl = vector<vl>;
using vP = vector<P>;
#define rep(i, n) for (ll i = 0; i < n; i++)
#define repp(i,k,n) for (ll i = k; i < n; i++)
#define per(i,s,e) for(ll i = s; i >= e; i--)
#define all(v) v.begin(),v.end()
#define yesno(a) a ? cout << "Yes" << '\n' : cout << "No" << '\n'
#define YESNO(a) a ? cout << "YES" << '\n' : cout << "NO" << '\n'
#define UNOmap unordered_map
#define UNOset unordered_set
#define chmax(a,b) a=max(a,b)
#define chmin(a,b) a=min(a,b)
#define debug(x) cerr << #x << " = " << x << '\n'

template<class... T>void in(T&... a){(cin >> ... >> a);}
template<class T, class... Ts>void out(const T& a, const Ts&... b){cout << a;((cout << ' ' <<  b), ...);cout << '\n';}
template<class T> void vin2(vector<T> &u,vector<T> &v){for(ll i = 0; i < (ll)v.size(); i++) in(u[i],v[i]);}
template<class T> void vin(vector<T> &v){for(ll i = 0; i < (ll)v.size(); i++)in(v[i]);}
template<class T> void vout(vector<T> &v){for(ll i = 0; i < (ll)v.size(); i++) cout << v[i] << ' ';cout << "\n";}

ll INF = 1152921504606846976;ll MOD =998244353; ll MOD1 =1000000007;
/* INF = 1LL << 60 */

#define sl(...) ll __VA_ARGS__; in(__VA_ARGS__)
 
using mint = modint998244353;
using mint1 = modint1000000007;
using mintn = modint;
using vm = vector<mint>;
using vvm = vector<vm>;

vl dx = {0,0,1,-1}, dy = {1,-1,0,0};
//----------------------------------------------



int main(){
  ios::sync_with_stdio(false);cin.tie(nullptr);cout<<fixed<<setprecision(15);
//==============================================

  ll N,M,L,S,E;
  in(N,M,L,S,E);
  
  vector<vector<P>> G(N);
  rep(i,M){
    ll a,b,t;
    in(a,b,t);
    a--;b--;
    G[a].push_back(pair(t,b));
    G[b].push_back(pair(t,a));
  }
  
  vl T(L);
  vin(T);
  
  ll ans = INF;
  
  
  auto dijkstra = [&](ll start){
    vl dist(N,INF);
    priority_queue<P,vector<P>,greater<P>> pq;
    pq.push({0,start});
    dist[start] = 0;
    while(pq.size()){
      auto[cost,v] = pq.top();
      pq.pop();
      
      if(cost != dist[v]) continue;
      
      for(auto [nc,nv] : G[v]){
        if(dist[v] + nc < dist[nv]){
          dist[nv] = dist[v] + nc;
          pq.push({dist[nv],nv});
        }
      }
    }
    
    return dist;
  };
  
  
  
  vl dist = dijkstra(0);
  vl tg = dijkstra(N-1);
  
  
  rep(i,L){
    ll cur = 0;
    cur += dist[T[i]-1];
    chmax(cur,S);
    if(cur >= S + E) continue;
    cur++;
    cur += tg[T[i]-1];
    chmin(ans,cur);
    
    
  }
    
    if(ans == INF){
      out(-1);
      return 0;
    }
    out(ans);
}