perl -ne "print unpack("B*", $_)" input_file > output_file #### perl -ne "print pack("B*", $_)" input_file > output_file