#include<bits/stdc++.h>
using namespace std;
int n,m,xyx,xyy,lx,ly;
int fx[4]={0,1,0,-1};
int fy[4]={1,0,-1,0};
char a[101][101];
int b[101][101];
void dfs(int x,int y,int k){
	b[x][y]=k;
//	a[x][y]='#';
//	if(x==xyx&&y==xyy){
//		cout<<b[x][y]<<endl;
//	for(int i=1;i<=n;i++){
//	   for(int j=1;j<=m;j++){
//	   	cout<<b[i][j];
//	   }	
//	   cout<<endl;
//	  
//	}
//	 exit(0);
//}
for(int i=0;i<=3;i++){
		int tx=x+fx[i];
		int ty=y+fy[i];
		if(tx>=1&&tx<=n&&ty>=1&&ty<=m&&a[tx][ty]!='#'&&k+1<b[tx][ty]){
			
//			cout<<tx<<ty<<endl;
			dfs(tx,ty,k+1);
		}
	}
}
int main(){
   cin>>n>>m;
   for(int i=1;i<=n;i++){
   	for(int j=1;j<=m;j++){
   		cin>>a[i][j];
   		if(a[i][j]=='T'){
   			xyx=i;
   			xyy=j;
   		}
   		if(a[i][j]=='S'){
   			lx=i;
   			ly=j;
   		}
   		b[i][j]=INT_MAX;
   	}
   }
   dfs(lx,ly,0);
   if(b[xyx][xyy]==INT_MAX){
   	cout<<-1;
   }
   else cout<<b[xyx][xyy];
   return 0;
}

/**************************************************************
	Problem: 1433
	User: chenjingqi
	Language: C++
	Result: Accepted
	Time:24 ms
	Memory:2124 kb
****************************************************************/