The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

App::vl - Makes CUI table vertical

SYNOPSIS

    use App::vl;

    my $vl = App::vl->new(@ARGV)->run;

See command vl.

DESCRIPTION

App::vl makes typical CUI table vertical.

For example,

    $ kubectl get pods
    NAME                         READY     STATUS    RESTARTS   AGE
    hello-web-4017757401-ntgdb   1/1       Running   0          9s
    hello-web-4017757401-pc4j9   1/1       Running   0          9s

Be vertical by vl

    $ kubectl get pods | vl
    ********** 1 ********************
        NAME: hello-web-4017757401-ntgdb
       READY: 1/1
      STATUS: Running
    RESTARTS: 0
         AGE: 9s
    ********** 2 ********************
        NAME: hello-web-4017757401-pc4j9
       READY: 1/1
      STATUS: Running
    RESTARTS: 0
         AGE: 9s

CAVEAT

Labels must NOT contain \ (backslash).

METHODS

new

Constractor

run

main routine

opt

getter for options

labels

getter/setter for the label list

column_length_list

getter/setter for the length list of columns

REPOSITORY

App::vl is hosted on github: http://github.com/bayashi/App-vl

I appreciate any feedback :D

AUTHOR

Dai Okabayashi <bayashi@cpan.org>

SEE ALSO

vl

App::YG

LICENSE

This module is free software; you can redistribute it and/or modify it under the same terms as Perl itself. See perlartistic.