C:\>perl -p -e"1 while s/^([01 ]*?)([01]*)-([-01]*)([-01 ]*)$/$1${2}0$ +3 ${2}1$3$4/" 000- 0101 011- 1-0- 0000 0001 0101 0110 0111 1000 1001 1100 1101
In reply to Re: Working with Binary Numbers
by catellus
in thread Working with Binary Numbers
by shoness
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |