From 1581d8acae9b0ed74bd4c5a696f6cdc470fe84d9 Mon Sep 17 00:00:00 2001
From: Mischa POSLAWSKY <perl@shiar.org>
Date: Mon, 9 Sep 2019 18:57:40 +0200
Subject: [PATCH] replace perl in example date parsing

Time::Piece was released with perl v5.8.9 but may not be installed on
restricted systems.  Hardcoding the number of days is less flexible but
"only" relies on a GNU date supporting -d.

Furthermore, git only supports date formatting since version 2.6.0,
so prefer an equivalent cut similar to earlier year selection.
---
 barcat | 5 ++---
 1 file changed, 2 insertions(+), 3 deletions(-)

diff --git a/barcat b/barcat
index 2a7bdbf..c2f41aa 100755
--- a/barcat
+++ b/barcat
@@ -391,9 +391,8 @@ Or the top 3 most frequent authors with statistics over all:
 
 Activity of the last days:
 
-    git log --pretty=%cd --date=format:%F --since=1month |
-    perl -MTime::Piece -pE
-        'for ($t //= localtime; $t->ymd gt $_; $t -= 24*60*60) {say $t->ymd}' |
+    ( git log --pretty=%ci --since=30day | cut -b-10
+      seq 0 30 | xargs -i date +%F -d-{}day ) |
     sort | uniq -c | awk '$1--' | graph
 
 =head1 AUTHOR
-- 
2.30.0