$ perl -MO=Deparse,-p -e '$_= ~/ssId=\s*?(\S+)/'
($_ = (~/ssId=\s*?(\S+)/));
-e syntax OK