$text =~ s/\r\n/\n/;