../../Task/Bitwise-operations/Perl