$text =~ s/^\n+(.*?)\n+$/$1/s;