#!perl -apl
sub f{vec qw(IÐ €è �Œ$�J.ž�P�Pl-�Z.žOJŸžž��Œ$5Œ�Z)[$$%3],$b++,2}$v=f;@G=qw(+ - × /);$_="(-1FGF)>1G(>2F)<1GF)>2";s/(\W)(..)/"$v$2?\$1:''"/gee;s/(\w)/$$1[f]/g