view bin/learn @ 11614:85e3f7b05306 draft

<oerjan> learn `dowg: See `hoag
author HackEso <hackeso@esolangs.org>
date Thu, 23 Aug 2018 11:55:22 +0000
parents c989a1669243
children 148a9eb1caa3
line wrap: on
line source

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