photo-stats

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

introduce text formatting

Diffstat:
M
phosta.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; 
 }