=encoding utf-8
=head1 NAME
Text::Control - Transforms of control characters
=head1 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
=head1 DESCRIPTION
These are transforms that I find useful for debugging. Maybe you will, too?
=head1 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”.
=head1 FUNCTIONS
=head2 to_dot( OCTET_STRING )
Transforms each nonprintable byte into a dot (C<.>, ASCII 46) and returns
the result.
=head2 to_hex( OCTET_STRING )
Transforms each nonprintable byte into the corresponding \x.. sequence,
appropriate for feeding into
C<eval()>. For example, a NUL byte comes out as C<\x00>.
In order to make this encoding reversible, backslash characters (C<\>) are
double-escaped (i.e., C<\> becomes C<\\>).
=head2 from_hex( FROM_TO_HEX )
This transforms the result of C<to_hex()> back into its original form.
I’m not sure this is actually useful :), but hey.
=head1 AUTHOR
Felipe Gasper (FELIPE)
=head1 REPOSITORY
https://github.com/FGasper/p5-Text-Control
=head1 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.
