#!perl -pa
$_=eval'(4*2-1*5)/(6=0*4-1*3).$".(0*5-3*2)/6'=~s/\d/\$F[$&]/gr