#include <bits/stdc++.h>
#pragma GCC optimize("O3")
#define int long long
#define ll long long
#define pb push_back
#define fi first
#define se second
#define lf (id<<1)
#define rg ((id<<1)|1)
#define md ((l+r)>>1)
#define ld long double
using namespace std;
typedef pair<int,int> pii;
typedef pair<int,pii> ipii;
const int MAXN = 1e5+10;
const int MAXA = 1e9;
const int INF = 2e9+100;
const int SQRT = 500;
const int LOG = 19;
const int MOD = 998244353;
void chmn(auto &a, auto b){ a = min(a, b); }
void chmx(auto &a, auto b){ a = max(a, b); }
int sum(int a, int b){ a %= MOD; b %= MOD; return (a+b)%MOD; }
void chsum(int &a, int b){ a %= MOD; b %= MOD; a = (a+b)%MOD; }
void chsub(int &a, int b){ a %= MOD; b %= MOD; a = (a+MOD-b)%MOD; }
int mul(int a, int b){ a %= MOD; b %= MOD; return a*b%MOD;}
void chmul(int &a, int b){ a = a*b%MOD; }
int expo(int a, int b){
if(b==0) return 1;
int te = expo(a, b/2); te = mul(te, te);
return (b%2 ? mul(te, a) : te);
}
int n, m, k, par[MAXN], d[MAXN], w[MAXN];
vector<int> adj[MAXN]; // from root decreasing days
int opt[MAXN], val[MAXN];
void dfs(int nw){
for(auto nx : adj[nw]){
dfs(nx); val[nw] += val[nx];
}
}
signed main(){
// ios_base::sync_with_stdio(0);cin.tie(0);cout.tie(0);
cin>>n>>m>>k;
for(int i=2; i<=n; i++){
cin>>par[i]; adj[par[i]].pb(i);
}
vector<pii> vec;
for(int i=1; i<=m; i++){
int id, day, wei; cin>>id>>day>>wei;
vec.pb({day, id});
d[id] = day; w[id] = wei;
}
sort(vec.rbegin(), vec.rend()); // dec day
for(int i=0; i<vec.size(); ){
int j = vec[i].fi;
vector<int>upd;
while(i<vec.size() && vec[i].fi==j){
upd.pb(vec[i].se);
i++;
}
sort(upd.rbegin(), upd.rend()); // bawah ke atas
for(auto id : upd){
val[id] = w[id];
}
dfs(1);
for(auto id : upd){
if(opt[id]<val[id]){
int nw = id, add = val[id]-opt[id];
while(nw != 0){
opt[nw] += add;
nw = par[nw];
}
}
}
for(int i=1; i<=n; i++) val[i] = 0;
}
// for(int i=1; i<=n; i++) cout << i << ' ' <<opt[i] << " opt\n";
cout << opt[1] << '\n';
}
