+
+}
+show_lines();
+
+__END__
+
+=head1 NAME
+
+graph - append bar chart to input numbers
+
+=head1 SYNOPSIS
+
+B<graph> [<options>] [<input>]
+
+=head1 DESCRIPTION
+
+Each line starting with a number is given a bar to visualise relative sizes.
+
+=head1 OPTIONS
+
+=over
+
+=item -c, --[no-]color
+
+Force colored output of values and bar markers.
+Defaults on if output is a tty,
+disabled otherwise such as when piped or redirected.
+
+=item -f, --follow[=<seconds>]
+
+Interval to output partial progress.
+
+=item -l, --length=[-]<size>[%]
+
+Trim line contents (between number and bars)
+to a maximum number of characters.
+The exceeding part is replaced by an abbreviation sign,
+unless C<--length=0>.
+
+Prepend a dash (i.e. make negative) to enforce padding
+regardless of encountered contents.
+
+=item -m, --markers=
+
+Statistical positions to indicate on bars.
+Cannot be customized yet,
+only disabled by providing an empty argument.
+
+Any value enables all marker characters:
+
+=over 2
+
+=item B<=>
+
+Average:
+the sum of all values divided by the number of counted lines.
+
+=item B<+>
+
+Mean, median:
+the middle value or average between middle values.
+
+=item B<<>
+
+Standard deviation left of the mean.
+Only 16% of all values are lower.
+
+=item B<< > >>
+
+Standard deviation right of the mean.
+The part between B<< <--> >> encompass all I<normal> results,
+or 68% of all entries.
+
+=back
+
+=item -u, --unmodified
+
+Do not strip leading whitespace.
+Keep original value alignment, which may be significant in some programs.
+
+=item -w, --width=<columns>
+
+Override the maximum number of columns to use.
+Appended graphics will extend to fill up the entire screen.
+
+=back
+
+=head1 EXAMPLES
+
+Commonly used after counting, such as users on the current server:
+
+ users | sed 's/ /\n/g' | sort | uniq -c | graph
+
+Letter frequencies in text files:
+
+ cat /usr/share/games/fortunes/*.u8 |
+ perl -CO -nE 'say for grep length, split /\PL*/, uc' |
+ sort | uniq -c | graph
+
+Memory usage of user processes:
+
+ ps xo %mem,pid,cmd | graph -l40
+
+Sizes (in megabytes) of all root files and directories:
+
+ du -d0 -m * | graph
+
+Number of HTTP requests per day:
+
+ cat log/access.log | cut -d\ -f4 | cut -d: -f1 | uniq -c | graph
+
+Any kind of database query with leading counts:
+
+ echo 'SELECT count(*),schemaname FROM pg_tables GROUP BY 2' |
+ psql -t | graph -u
+
+Git statistics, such commit count by year:
+
+ git log --pretty=%ci | cut -b-4 | uniq -c | graph
+
+Or the most frequent authors:
+
+ git shortlog -sn | graph | head -3
+
+Latency history:
+
+ ping google.com |
+ perl -pe '$|=1; print s/ time=(.*)// ? "$1 for " : "> "' | graph -f
+
+=head1 AUTHOR
+
+Mischa POSLAWSKY <perl@shiar.org>
+
+=head1 LICENSE
+
+GPL3+.