use strict; use warnings; while (){ print /^\s*(public)|^\s*(private)/?$_ = "/*".$_."*/\n":"$_\n"; } __DATA__ /** * public void method1(); * is deprecated */ public void method1(); rgrprivate void method2(); private void method3();