NAME

Term::Vspark - Perl extension for dispaying bars in the terminal

SYNOPSIS

Displays beautiful graphs to use in the terminal

DESCRIPTION

Methods

Returns a string with a single utf8 bar according to the values

Term::Vspark::show_single_bar($value_for_this_bar, $max_value, $number_of_columns_to_display);

Returns a string with a various utf8 bars according to the values

Term::Vspark::show_graph('values' => \@values_for_this_graph, 'max' => $max_value, 'columns' => $number_of_columns_to_display);

displays stuff like this:

██████████████████████████████████████████████▊
█████████████████████████████████▌
███████████████████████████████████████▋
███████████████████████████████████████████████████████████████████████████████████████████████████████████████████▊
█████████████████████████████████
████████████████████████████████████████████████████████████████████████████████▍
██▋
████████████████████████████████
████████████████████████████████████████████████████████████████████████████████████████████████████████████████▎
████████████████████████████████████████████████████████████████▍
█████████████████
██▋

Example:

use Term::Vspark;
use Term::Size;

chomp( @ARGV = <STDIN> ) unless @ARGV;

my @list = sort { $a <=> $b } @ARGV;
my ($columns, $rows) = Term::Size::chars *STDOUT{IO};

Term::Vspark::show_graph(
    'max'     => $list[-1],
    'columns' => $columns,
    'values'  => \@ARGV,
);

This will receive numbers from ARGV or STDIN and print out beutiful graph based on that data.

SEE ALSO

Original repo: https://github.com/LuRsT/vspark

AUTHOR

Gil Gonçalves <lt>lurst@gmail.com<gt>

COPYRIGHT AND LICENSE

Copyright (C) 2013 by Gil Gonçalves

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.16.2 or, at your option, any later version of Perl 5 you may have available.