diff options
| author | Benjamin Morrison <ben@gbmor.org> | 2022-01-23 03:28:32 -0500 |
|---|---|---|
| committer | Benjamin Morrison <ben@gbmor.org> | 2022-01-23 03:28:32 -0500 |
| commit | 55328ee08b7a4d79dbba6f8f03026d3f7cfc6131 (patch) | |
| tree | 672fd7e88e1c518c16e14a7b817262a97a7f9c49 | |
| parent | 6c99987983961e8ff4471f009b4624618533a8e7 (diff) | |
| download | dogfiles-55328ee08b7a4d79dbba6f8f03026d3f7cfc6131.tar.gz | |
including covidate day-counter
| -rwxr-xr-x | bin/covidate | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/bin/covidate b/bin/covidate new file mode 100755 index 0000000..67d8c48 --- /dev/null +++ b/bin/covidate @@ -0,0 +1,5 @@ +#!/bin/sh +# covidate.pl +# credit goes to jwz for this one-liner + +perl -e 'use Date::Parse; use POSIX; my @t = localtime; print strftime ("%a Mar ", @t) . int (1 + 0.5 + ((str2time (strftime ("%Y-%m-%d 3:00", @t)) - str2time ("2020-03-01 3:00")) /(60*60*24))) . strftime (" %X %Z 2020\n", @t);' |