do {local $/ = $/.$/;print join('<p>', <FILE>);};