$message =~ s/[\r\n]+$//;