view bin/learn @ 12166:2b6654c1b493 draft

<oerjan> undo 12162
author HackEso <hackeso@esolangs.org>
date Wed, 20 Nov 2019 04:13:12 +0000
parents 148a9eb1caa3
children
line wrap: on
line source

#!/bin/bash
topic=$(echo "$1" | lowercase | sed 's/^\(an\?\|the\) //;s/s\?[:;,.!?]\? .*//')
[ -e "$HACKENV/wisdom/$topic" ] && verb="Relearned" || verb="Learned"
echo "$1" >"$(echo-p "$HACKENV/wisdom/$topic")"
echo "$verb '$topic': $1"