photo-stats

Unnamed repository; edit this file 'description' to name the repository.
git clone git://code.clttr.info/photo-stats.git
Log | Files | Refs | README | LICENSE

commit 01652fad26b362e043a3e6495a150658c26422b8
parent be63280bffa94d1061ae4c71e59c3ac1af6e0b78
Author: René Wagner <rwagner@rw-net.de>
Date:   Sun, 16 Aug 2020 09:59:10 +0200

introduce text formatting

Diffstat:
Mphosta.pl | 6++++--
1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/phosta.pl b/phosta.pl @@ -10,6 +10,7 @@ use strict; use feature 'say'; use POSIX 'lround'; use Text::SimpleTable::AutoWidth; +use Term::ANSIColor; use Scalar::Util 'looks_like_number'; use Cwd; use DBI; @@ -270,8 +271,9 @@ sub result_to_stdout if (defined($opt_n)) { - say "Showing top $currentlines results, skipping $skippedlines lines."; - say "A total of $sum images matched your criteria."; + say 'Showing '. color('bold'). "top $currentlines". color('reset'). ' results, skipping '. color('italic') . "$skippedlines lines".color('reset') .'.'; + say 'A total of '. color('bold'). "$sum images". color('reset') .' matched your criteria.'; + say ''; } say $tb->draw; }