Infix to RPN

Score: 149.25 (pass)

#!perl -p
s//ac/;s/\s//g;1while s,(a.*)(c(-?\d+)|([*/])
(?=[*-/])|([-+])
(?=[-+])),$3$4$5 $1
,||s,
([^)]),$1c,||s,c.,dc,||s,d
.,
,||s,(a.*)(.),$2 $1,;s/ a//

Score: 157.26 (pass)

#!perl -p
s//ac/;s/\s//g;1while s,(a.*)c(-?\d+),$2 $1
,||s,(a.*)([*/](?=
[*-/])|[-+](?=
[-+])),$2 $1,||s,
([*-/]),$1c,||s,c.,dc,||s,d
.,
,||s,(a.*)(.),$2 $1,;s/ a//

Score: 165.25 (pass)

#!perl -p
s//ac/;s/\s//g;1while s,(a.*)c(-?\d+),$2 $1
,||s,(a.*)(([*/])|[-+])(
(?(3)[-+*/]|[-+])),$2 $1$4,||s,
([-+*/]),$1c,||s,c\(,dc,||s,d
\),
,||s,(a.*)(.),$2 $1,;s/ a//

Score: 167.22 (pass)

#!perl -p
s//ac/;s/\s//g;1while s,(a.*)c(-?\d+),$2 $1
,||s,(a.*)(([*/])|[-+])(
(?(3)[-+*/]|[-+])),$2 $1$4,||s,
([-+*/]),$1c,||s,c\(,dc,||s,d
\),
,||s,(a.*)(.)
,$2 $1
,;s/ a//

Score: 172.59 (pass)

#!perl -pl
s/^/ac/;s/\s//g;1while s,(a.*)c(-?\d+),$2 $1b,||s,(a.*)(([*/])|([-+]))(b(?(3)[-+*/]|[-+])),$2 $1$5,||s,b([-+*/]),$1c,||s,c\(,dc,||s,db\),b,||s,(a.*)(.)b,$2 $1b,;s/ ab//

Score: 183.60 (pass)

#!perl -pl
s/^/ac/;s/\s//g;1while s,(a.*)c(-?\d+),$2 $1b,||s,(a.*)([*/])(b[*/]),$2 $1$3,||s,(a.*)([-+*/])(b[-+]),$2 $1$3,||s,b([-+*/]),$1c,||s,c\(,dc,||s,db\),b,||s,(a.*)(.)b,$2 $1b,;s/ ab//