#include<bits/stdc++.h>
using namespace std;
#define int long long
#define ll unsigned long long
#define all(x) (x).begin(),(x).end()
#define rall(x) (x).rbegin(),(x).rend()
#define f first
#define s second
#define yes cout<<"YES\n"
#define no cout<<"NO\n"
#define imp cout<<-1<<"\n"
#define pb push_back
#define pii pair<int,int>
#define piii pair<int,pair<int,int>>
#define ls v<<1
#define rs v<<1|1
#define fast ios::sync_with_stdio(false);cin.tie(0);cout.tie(0)
#define ptree tree *
const int mod=1e9+7;
const int INF = 1e18;
const int sqr=317;
const int N=1e6;
int modi(int a,int b){
return (a*b)%mod;
}
vector<vector<pii>>g;
void solve(){
int n,m,k,a=1e18,b=0,c=0,d,e=0,f=0;
cin>>n>>m;
n++;
m++;
g.resize((n+2)*(m+2));
for(int i=1;i<n;i++){
for(int j=1;j<m;j++){
char ch;
cin>>ch;
if(ch=='W'){
g[i*m+j].pb({m*i+j-1,0});
g[i*m+j].pb({m*(i-1)+j,1});
g[i*m+j].pb({m*i+j+1,2});
g[i*m+j].pb({m*(i+1)+j,3});
}
if(ch=='N'){
g[i*m+j].pb({m*i+j-1,3});
g[i*m+j].pb({m*(i-1)+j,0});
g[i*m+j].pb({m*i+j+1,1});
g[i*m+j].pb({m*(i+1)+j,2});
}
if(ch=='E'){
g[i*m+j].pb({m*i+j-1,2});
g[i*m+j].pb({m*(i-1)+j,3});
g[i*m+j].pb({m*i+j+1,0});
g[i*m+j].pb({m*(i+1)+j,1});
}
if(ch=='S'){
g[i*m+j].pb({m*i+j-1,1});
g[i*m+j].pb({m*(i-1)+j,2});
g[i*m+j].pb({m*i+j+1,3});
g[i*m+j].pb({m*(i+1)+j,0});
}
}
}
int sz=(n+2)*(m+2);
vector<int>dd((n+2)*(m+2),INF);
vector<int>us((n+2)*(m+2),0);
dd[m+1]=0;
priority_queue<pii,vector<pii>,greater<pii>>q;
q.push({0,m+1});
while(!q.empty()){
auto [w,v]=q.top();
q.pop();
if(w>dd[v]){
continue;
}
for(auto k:g[v]){
if(dd[k.f]>dd[v]+k.s){
dd[k.f]=dd[v]+k.s;
q.push({dd[k.f],k.f});
}
}
}
if(dd[(n-1)*m+m-1]==INF)
cout<<-1<<"\n";
else
cout<<dd[(n-1)*m+m-1]<<"\n";
}
signed main(){
fast;
int t=1;
// cin>>t;
while(t--){
solve();
}
}
