$variable =~ tr/\n//d;