my $lb   = () = $text =~ /(\n)/g;