($a,$b)=sort{$a<=>$b}glob<>;
print$a<=($a^$b)?$a:do{$a=1;$a=$a*2while$b>($a*2-1&$b);$a-1}