$data =~ s/\n\r?/\n/g;