=head1 SYNOPSIS
- use Text::Tabs qw(expand unexpand);
+ use Text::Tabs;
+ $tabstop = 4; # default = 8
@lines_without_tabs = expand(@lines_with_tabs);
@lines_with_tabs = unexpand(@lines_without_tabs);
- {
- local $Text::Tabs::tabstop = 4; # default is 8
- @lines_without_tabs = expand(@lines_with_tabs);
- }
-
=head1 DESCRIPTION
Text::Tabs does about what the unix utilities expand(1) and unexpand(1)
it, unexpand will add tabs when it can save bytes by doing so (just
like C<unexpand -a>). Invisible compression with plain ASCII!
-The global variable C<$Text::Tabs::tabstop> controls how many columns
-positions apart each tabstop are. The default is 8.
-
-The functions expand(), unexpand() as well as the variable $tabstop
-are exported by default.
-
=head1 EXAMPLE
#!perl