Summarise the totals for each day.

diff --git a/timesheet.pl b/timesheet.pl
index 9968b0d1b015974a860b8b57b2a390e2f68310c3..36e02ba00d643b0eaf225edcbf786ea7bd248d05 100755 (executable)
--- a/timesheet.pl
+++ b/timesheet.pl
@@ -44,6 +44,7 @@ foreach my $entry ( @data ) {
 
 # loop over data
 my $current_date = '';
+my $current_date_hoursum = 0.0;
 foreach my $entry ( @data ) {
     # don't want data with no wr
     next unless defined $entry->{wr};
@@ -58,7 +59,14 @@ foreach my $entry ( @data ) {
     next unless defined $entry->{time} and $entry->{time} =~ m{ \d }xms;
 
     # output blank line for new date
-    print "\n" if $current_date and $current_date ne $entry->{date};
+    if ( $current_date and $current_date ne $entry->{date} ) {
+        # time to print a summary
+        printf("\t\t%.2f\n\n", $current_date_hoursum);
+        $current_date_hoursum = 0.0;
+    }
+    else {
+        $current_date_hoursum += $entry->{time};
+    }
     $current_date = $entry->{date};
 
     $total_time += $entry->{time};
@@ -76,7 +84,8 @@ foreach my $entry ( @data ) {
     );
 }
 
-print "\n";
+# The final summary
+printf("\t\t%.2f\n\n", $current_date_hoursum);
 print "Total time: $total_time\n";
 
 print "Run this program again with -c to commit the work\n" unless $args->{'-c'};