$data =~ s{[\r\n]+$}{};