<b_jonas> ` -e bin/en2sv || >bin/en2sv echo $\'#!/usr/bin/perl\\n\'\'use Encode; binmode *$_,"encoding(utf8)" for STDIN,STDOUT; local$/; for (split//,<STDIN>) { rand(5)<3 and y/EOeo/\\xc4\\xc5\\xe4\\xe5/; print }\'; chmod a+x bin/en2sv

#!/bin/bash
topic=$(echo "$1" | lowercase | sed 's/^\(an\?\|the\) //;s/s\? .*//')
echo "$1" >"wisdom/$topic"
echo "Learned '$topic': $1"