perl shake.pl lear.htm > learout.htm