https://mamchenkov.net/wordpress/2006/01/26/decimal-to-binary-convertion-in-perl/
Decimal to binary convertion in Perl