#include<bits/stdc++.h>
using namespace std;
#define ALL(x) x.begin(),x.end()
#define rep(i,n) for(int i=0;i<(n);i++)
#define debug(v) cout<<#v<<":";for(auto x:v){cout<<x<<' ';}cout<<endl;
#define mod 1000000007
using ll=long long;
const int INF=1000000000;
const ll LINF=1001002003004005006ll;
int dx[]={1,0,-1,0};
int dy[]={0,1,0,-1};
// ll gcd(ll a,ll b){return b?gcd(b,a%b):a;}
template<class T>bool chmax(T &a,const T &b){if(a<b){a=b;return true;}return false;}
template<class T>bool chmin(T &a,const T &b){if(b<a){a=b;return true;}return false;}

struct IOSetup{
    IOSetup(){
        cin.tie(0);
        ios::sync_with_stdio(0);
        cout<<fixed<<setprecision(12);
    }
} iosetup;

template<typename T1,typename T2>
ostream &operator<<(ostream &os,const pair<T1,T2>&p){
    os<<p.first<<" "<<p.second;
    return os;
}

template<typename T>
ostream &operator<<(ostream &os,const vector<T>&v){
    for(int i=0;i<(int)v.size();i++) os<<v[i]<<(i+1==v.size()?"":" ");
    return os;
}

template<typename T>
struct Dinic{
    //適当にフローを流す
    //流した辺のcapを減らし，逆辺のcapをその分増やす
    //これを繰り返す
    //O(EV^2)，通常こんなにかからない
 
    const T TINF;
 
    struct edge{
        int to;
        //容量
        T cap;
        int rev;
        bool isrev;
        int idx;
    };
 
    vector<vector<edge>> g;
    vector<int> min_cost, iter;
 
    Dinic(int V):TINF(numeric_limits<T>::max()),g(V){}
 
    void add_edge(int from, int to, T cap, int idx=-1){
        g[from].push_back((edge){to,   cap, (int)g[to].size(),     false, idx});
        g[to].  push_back((edge){from, 0,   (int)g[from].size()-1, true,  idx});
    }
 
    bool bfs(int s, int t){
        min_cost.assign(g.size(), -1);
        queue<int> q;
        min_cost[s]=0;
        q.push(s);
        while(!q.empty() and min_cost[t]==-1){
            int p=q.front();q.pop();
            for(auto &e:g[p]){
                //流せるなら
                if(e.cap>0 and min_cost[e.to]==-1){
                    min_cost[e.to]=min_cost[p]+1;
                    q.push(e.to);
                }
            }
        }
        //tまで流せるパスが1つでもあるならtrueを返す
        return min_cost[t]!=-1;
    }
 
    //dfsでtまでフローを流せるだけ流すdfs
    T dfs(int idx, const int t, T flow){
        if(idx==t) return flow;
        for(int &i=iter[idx];i<g[idx].size();i++){
            edge &e=g[idx][i];
            if(e.cap and min_cost[idx]<min_cost[e.to]){
                //今のポイントに流れてきた分を次の点に流せるだけ流す
                T d=dfs(e.to, t, min(flow,e.cap));
                if(d>0){
                    //流せるならcapの量を減らし，逆辺のcapを増やす
                    e.cap-=d;
                    g[e.to][e.rev].cap+=d;
                    //どこか1つ見つければいいのでd>0で
                    //dが見つかれば即リターン
                    //次はi以降を観ればいいので&iでiを更新してiterに記憶
                    return d;
                }
            }
        }
        return 0;
    }
 
    T max_flow(int s,int t){
        T flow=0;
        while(bfs(s,t)){
            iter.assign(g.size(),0);
            T f=0;
            while((f=dfs(s,t,INF))>0) flow+=f;
        }
        return flow;
    }
 
};


// 問題に最小カットって書いてませんか？
signed main(){
    int h,w;cin>>h>>w;
    string s[h];
    rep(i,h) cin>>s[i];

    Dinic<int> flow(h+w+2);
    int src=h+w,sink=h+w+1;
    rep(i,h){
        rep(j,w){
            if(s[i][j]=='.') continue;
            if(s[i][j]=='S'){
                flow.add_edge(src,i,INF);
                flow.add_edge(src,h+j,INF);
            }
            if(s[i][j]=='T'){
                flow.add_edge(i,sink,INF);
                flow.add_edge(h+j,sink,INF);
            }
            if(s[i][j]=='o'){
                flow.add_edge(i,h+j,1);
                flow.add_edge(h+j,i,1);
            }
        }
    }
    int ans=flow.max_flow(src,sink);
    if(ans>=INF) cout<<-1<<endl;
    else cout<<ans<<endl;
    return 0;
}


Measured memory_bytes: 4464