$ perl -we'printf "%b", 123'
1111011