一个正则的写法（PHP代码）

/r/n[^/s{4,}]

<?php 
echo '<textarea rows=38 cols=50>'.$file=file_get_contents($_GET['f']).'</textarea>'; 
$p='//r/n([^/s{4,}])/'; 
$r='//1'; 
echo '<textarea rows=38 cols=50>'.preg_replace($p,$r,$file).'</textarea>'; 
?>