<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;

2011-12-21.txt:21:03:14: <monqy> itidus21 do you understand bizarre notations
2011-12-23.txt:06:12:32: <itidus21> `pastelogs bizarre notations