changeset 12083:157ed35cafd4 draft

<fizzie> sled /hackenv/bin/lastwisdoms//s|find .hg|find $HACKENV/.hg|;s|s=\\^\\.hg|s=^.*?.hg|
author HackEso <hackeso@esolangs.org>
date Sat, 16 Nov 2019 22:07:34 +0000
parents a672b3954bc8
children 0b26b70b01cf
files bin/lastwisdoms
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/bin/lastwisdoms	Sat Nov 16 22:00:35 2019 +0000
+++ b/bin/lastwisdoms	Sat Nov 16 22:07:34 2019 +0000
@@ -1,1 +1,1 @@
-find .hg/store/data/wisdom -type f -print0 | xargs -0 /bin/ls -t | perl -pe 'use POSIX;chop;$d=strftime("%F",localtime((stat($_))[9]));s=^.hg/store/data/wisdom/(.*).i$=\1 // =;s=^=/$d/ = if$d ne$p;$p=$d;s=_(.)=uc($1)=eg;s=~([0-9a-f][0-9a-f])=chr hex$1=eg'
+find $HACKENV/.hg/store/data/wisdom -type f -print0 | xargs -0 /bin/ls -t | perl -pe 'use POSIX;chop;$d=strftime("%F",localtime((stat($_))[9]));s=^.*?.hg/store/data/wisdom/(.*).i$=\1 // =;s=^=/$d/ = if$d ne$p;$p=$d;s=_(.)=uc($1)=eg;s=~([0-9a-f][0-9a-f])=chr hex$1=eg'