view bin/mislearn @ 8750:8934300cd6d1

<b_jonas> `` perl -i -pe \'s/("\\x241)/-- $1/\' bin/random-card
author HackBot
date Tue, 05 Jul 2016 13:39:32 +0000
parents 061734ba3033
children
line wrap: on
line source

#!/bin/bash
topic=$(echo "$1" | lowercase | sed 's/^\(an\?\|the\) //;s/s\?[:;,.!?]\? .*//')
echo "$1" >"tmflry/$topic"
echo "Was lied to about '$topic': $1"