my $str = "bla bla bla : ==bla bla ==bla bla ====bla bla bla .... .... "; $str =~ s/\n\n+/\n/g; print qq{\$str = "$str";\n}; __END__ $str = "bla bla bla : ==bla bla ==bla bla ====bla bla bla .... .... ";
In reply to Re: trim the blank lines...regex
by kyle
in thread trim the blank lines...regex
by dani_cv
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |