Felipe Gasper
and 1 contributors

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

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.