# NAME Text::Control - Transforms of control characters # SYNOPSIS use Text::Control; Text::Control::to_dot("\x00\\Hi\x7fthere.\x80\xff"); # .\Hi.there... Text::Control::to_hex("\x00\\Hi\x7fthere.\x80\xff"); # \x00\\Hi\x7fthere.\x80\xff -- note the escaped backslash # DESCRIPTION These are transforms that I find useful for debugging. Maybe you will, too? # NONPRINTABLE BYTES This module considers byte numbers 32 - 126 to be “printable”; i.e., they represent actual ASCII characters. Anything outside this range is thus “nonprintable”. # FUNCTIONS ## to\_dot( OCTET\_STRING ) Transforms each nonprintable byte into a dot (`.`, ASCII 46) and returns the result. ## to\_hex( OCTET\_STRING ) Transforms each nonprintable byte into the corresponding \\x.. sequence, appropriate for feeding into `eval()`. For example, a NUL byte comes out as `\x00`. In order to make this encoding reversible, backslash characters (`\`) are double-escaped (i.e., `\` becomes `\\`). ## from\_hex( FROM\_TO\_HEX ) This transforms the result of `to_hex()` back into its original form. I’m not sure this is actually useful :), but hey. # AUTHOR Felipe Gasper (FELIPE) # REPOSITORY [https://github.com/FGasper/p5-Text-Control](https://github.com/FGasper/p5-Text-Control) # COPYRIGHT This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself. The full text of the license can be found in the LICENSE file included with this module.