$data =~ s/(.*)\n$/$1/mg;