Johnson, Roy R SIEP Thu, 10 Mar 2005 11:07:41 -0800
Minus another char: perl -pi -e 's//<>/e;eof||redo' in.file
