Mercurial > repo
annotate bin/slashlearn_append @ 12262:6908a7095bcd draft
<int-e> sled ../bin/"//s=-r=--r=
author | HackEso <hackeso@esolangs.org> |
---|---|
date | Sun, 08 Dec 2019 00:00:47 +0000 |
parents | 652d1c5a24be |
children |
rev | line source |
---|---|
12187
652d1c5a24be
<fizzie> ` mv /hackenv/le/rn_append /hackenv/bin/slashlearn_append && ln -sf /hackenv/bin/slashlearn_append /hackenv/le/rn_append # let\'s make that consistent
HackEso <hackeso@esolangs.org>
parents:
diff
changeset
|
1 sep="//" |
652d1c5a24be
<fizzie> ` mv /hackenv/le/rn_append /hackenv/bin/slashlearn_append && ln -sf /hackenv/bin/slashlearn_append /hackenv/le/rn_append # let\'s make that consistent
HackEso <hackeso@esolangs.org>
parents:
diff
changeset
|
2 [[ "$1" == ?*"$sep"* ]] || exit 1 |
652d1c5a24be
<fizzie> ` mv /hackenv/le/rn_append /hackenv/bin/slashlearn_append && ln -sf /hackenv/bin/slashlearn_append /hackenv/le/rn_append # let\'s make that consistent
HackEso <hackeso@esolangs.org>
parents:
diff
changeset
|
3 topic="$(echo "${1%%$sep*}" | lowercase)" |
652d1c5a24be
<fizzie> ` mv /hackenv/le/rn_append /hackenv/bin/slashlearn_append && ln -sf /hackenv/bin/slashlearn_append /hackenv/le/rn_append # let\'s make that consistent
HackEso <hackeso@esolangs.org>
parents:
diff
changeset
|
4 stuff="${1#*$sep}" |
652d1c5a24be
<fizzie> ` mv /hackenv/le/rn_append /hackenv/bin/slashlearn_append && ln -sf /hackenv/bin/slashlearn_append /hackenv/le/rn_append # let\'s make that consistent
HackEso <hackeso@esolangs.org>
parents:
diff
changeset
|
5 perl -i -p -e 's/\n/ /' "${HACKENV-/hackenv}/wisdom/$topic" |
652d1c5a24be
<fizzie> ` mv /hackenv/le/rn_append /hackenv/bin/slashlearn_append && ln -sf /hackenv/bin/slashlearn_append /hackenv/le/rn_append # let\'s make that consistent
HackEso <hackeso@esolangs.org>
parents:
diff
changeset
|
6 echo "$stuff" >>"${HACKENV-/hackenv}/wisdom/$topic" |
652d1c5a24be
<fizzie> ` mv /hackenv/le/rn_append /hackenv/bin/slashlearn_append && ln -sf /hackenv/bin/slashlearn_append /hackenv/le/rn_append # let\'s make that consistent
HackEso <hackeso@esolangs.org>
parents:
diff
changeset
|
7 echo -n "Learned '$topic': " |
652d1c5a24be
<fizzie> ` mv /hackenv/le/rn_append /hackenv/bin/slashlearn_append && ln -sf /hackenv/bin/slashlearn_append /hackenv/le/rn_append # let\'s make that consistent
HackEso <hackeso@esolangs.org>
parents:
diff
changeset
|
8 cat "${HACKENV-/hackenv}/wisdom/$topic" |