perl -lnE 'y/FBRL/0110/;$x=$_ if$x<$_}{say oct"0b$x"'
