<wob_jonas> perl -eopen$i,"<",($f="wisdom/aristotle");$_=<$i>; s/, even though.*\\. / without checking. / or die; if (1) { open$o,">",$f; print$o $_ or die; } print substr$_,0;

if [ -a "bin/${1%% = *}" ];then exec echo "${1%% = *}: Already exists.";fi;echo "${1#* = }" > "bin/${1%% = *}";chmod +x "bin/${1%% = *}"