#!perl
$_=<>;$_="($_)";y/ \t//d;s/\d+/ $& /g;s#([^ )])([+-]) #$1 $2#g;while(s#\(([^()]+)\)#$_=$1;foreach$a('/*','+-'){while(s! (\S+) ([$a]) (\S+) ! $1s$3s$2 !){}}$_#e){}y/s / /d;print

#!perl
$_=<>;$_="($_)";y/ \t//d;s/\d+/ $& /g;s#([*/+-])([+-]) #$1 $2#g;while(s#\(([^()]+)\)#$_=$1;foreach$a('/*','+-'){while(s! (\S+) ([$a]) (\S+) ! $1s$3s$2 !){}}$_#e){}y/s / /d;print

#!perl
$_=<>;$_="($_)";y/ \t//d;s/\d+/m$&m/g;s#([*/+-])([+-])m#$1m$2#g;while(s#\(([^()]+)\)#$_=$1;foreach$a('/*','+-'){while(s!m([^m]+)m([$a])m([^m]+)m!m$1 $3 $2m!){}}$_#e){}s/m//g;print

#!perl
$_=<>;$_="($_)";s/[ \t]//g;s/\d+/=$&=/g;s#([*/+-])([+-])=#$1=$2#g;while(s#\(([^()]+)\)#$_=$1;foreach$a('/*','+-'){while(s!=([^=]+)=([$a])=([^=]+)=!=$1 $3 $2=!){}}$_#e){}s/=//g;print

#!perl
$_=<>;$_="($_)";s/[ \t]//g;s/\d+/=$&=/g;s#([*/+-])([+-])=#$1=$2#g;while(s#\(([^()]+)\)#$_=$1;foreach$a('/*','+-'){while(s!=([^=]+)=([$a])=([^=]+)=!=$1 $3 $2=!){}}$_#e){}s/=//g;print;

#!perl
$_=<>;s/.+/($&)/;s/[ \t]//g;s/\d+/=$&=/g;s#([*/+-])([+-])=#$1=$2#g;while(s#\(([^()]+)\)#$_=$1;foreach$a('/*','+-'){while(s!=([^=]+)=([$a])=([^=]+)=!=$1 $3 $2=!){}}$_#e){}s/=//g;print;