Есть sub по преобразованию строки в битовую строку. Необходимо написать sub для выполнения побитовых операций NOT,OR,AND,XOR к тексту произвольной длины на PERL. А также sub для перевода полученный битовой строки в строку кириллицы.