commit - fa059a4e3f19706674ed7314d5c4a764a1bc8222
commit + 82d3a08d01e8d374dd7764ed8998f38ae50d8299
blob - bf31dac62b026789d56b90f6c9c60925015fdad1
blob + 04ef31c75dd91ca863d09467a0778ac673cde54d
--- bin/yesterday
+++ bin/yesterday
#!/usr/local/plan9/bin/rc
-path=($path $PLAN9/bin)
+. 9.rc
+smon='s/Jan/01/
+ s/Feb/02/
+ s/Mar/03/
+ s/Apr/04/
+ s/May/05/
+ s/Jun/06/
+ s/Jul/07/
+ s/Aug/08/
+ s/Sep/09/
+ s/Oct/10/
+ s/Nov/11/
+ s/Dec/12/'
+
+
fn usage {
echo 'usage: yesterday [-cd] [-[[yy]yy]mm]dd] [-n daysago] file ...' >[1=2]
exit 1
}
if not
days=`{echo $1 | sed 's/^-.//'}
- last=`{date -r `{perl -e 'print time() - '$days'*60*60*24'} |
- 9 sed -e 's%... (...) (..) ..:..:.. ... (....)%\3/\1\2%' -e 'y/ /0/' -e $smon}
+ last=`{date `{hoc -e `{date -n} ^ '-'$days'*60*60*24'} | \
+ sed -e 's%... (...) (..) ..:..:.. ... (....)%\3/\1\2%' -e 'y/ /0/' -e $smon}
shift
case -[0-9]
mon=`{date|9 sed 's/^....(...).*/\1/' -e $smon}